ispman/lib/ISPMan HostGroupMan.pm,1.15,1.16

Update of /cvsroot/ispman/ispman/lib/ISPMan
In directory sc8-pr-cvs2.sourceforge.net:/tmp/cvs-serv9682/lib/ISPMan

Modified Files:
	HostGroupMan.pm 
Log Message:
fixed [ 1553409 ] Web UI: Configure->Hosts and Configure->HostGroups
fixed [ 1569808 ] add hostgroup is broken
switched to css formating

Index: HostGroupMan.pm
===================================================================
RCS file: /cvsroot/ispman/ispman/lib/ISPMan/HostGroupMan.pm,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -d -r1.15 -r1.16
--- HostGroupMan.pm	30 May 2004 23:35:37 -0000	1.15
+++ HostGroupMan.pm	3 Oct 2006 08:56:35 -0000	1.16
@@ -7,6 +7,7 @@
 
 @ISA    = qw(ISPMan Exporter AutoLoader);
 @EXPORT = qw(
+  addHostGroupForm
   manageHostGroups
   makeHostGroupsBranch
   makeHostGroupDN
@@ -23,6 +24,13 @@
 );
 $VERSION = '0.01';
 
+sub addHostGroupForm {
+    my $self = shift;
+    return unless $ENV{'HTTP_USER_AGENT'};
+    my $template = $self->getTemplate("hostgroups/addHostGroup.tmpl");
+    print $template->fill_in( PACKAGE => "ISPMan" );
+}
+
 sub manageHostGroups {
     my $self = shift;
     return unless $ENV{'HTTP_USER_AGENT'};


-------------------------------------------------------------------------
Take Surveys. Earn Cash. Influence the Future of IT
Join SourceForge.net's Techsay panel and you'll get the chance to share your
opinions on IT & business topics through brief surveys -- and earn cash
http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV