[MKDoc-commit] Added missing file from Sam

[chris at mkdoc.demon.co.uk]

Log Message:
-----------
Added missing file from Sam

Tags:
----
mkdoc-1-6

Added Files:
-----------
    mkd/flo/plugin/Admin:
        GroupEdit.pm

-------------- next part --------------
--- /dev/null
+++ flo/plugin/Admin/GroupEdit.pm
@@ -0,0 +1,49 @@
+package flo::plugin::Admin::GroupEdit;
+use strict;
+use warnings;
+use flo::Standard;
+use base qw /flo::plugin::Admin::Group/;
+
+=head1 NAME
+
+flo::plugin::Admin::GroupEdit - URL redirector for .admin.group?rm=edit
+
+=head1 SYNOPSIS
+
+Link to this plugin like so:
+
+  <a href=".admin.groupedit?id=1000">Edit Group 1000</a>
+
+=head1 AUTHOR
+
+Sam Tregar <sam at tregar.com>
+
+=head1 COPYRIGHT
+
+Copyright MKDoc Holdings Ltd, 2005
+
+=head1 LICENSE
+
+MKDoc is free software; you can redistribute it and/or modify it under
+the terms of the GNU General Public License as published by the Free
+Software Foundation; either version 2 of the License, or (at your
+option) any later version.
+
+MKDoc is distributed in the hope that it will be useful, but WITHOUT
+ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+for more details.
+
+You should have received a copy of the GNU General Public License
+along with MKDoc; if not, write to the Free Software Foundation, Inc.,
+59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+
+=cut
+
+# redirector
+sub http_get  { 
+    flo::Standard::cgi()->param(rm => 'edit');
+    return shift()->SUPER::http_get();
+}
+
+1;