ispman/lib/ISPMan ConfMan.pm,1.10,1.11

Update of /cvsroot/ispman/ispman/lib/ISPMan
In directory sc8-pr-cvs1:/tmp/cvs-serv30552

Modified Files:
	ConfMan.pm 
Log Message:
just replacing the DN with a function call.. cleaning up

Index: ConfMan.pm
===================================================================
RCS file: /cvsroot/ispman/ispman/lib/ISPMan/ConfMan.pm,v
retrieving revision 1.10
retrieving revision 1.11
diff -u -d -r1.10 -r1.11
--- ConfMan.pm	13 Jan 2004 22:14:24 -0000	1.10
+++ ConfMan.pm	14 Jan 2004 00:01:24 -0000	1.11
@@ -88,7 +88,7 @@
    return unless $self->{'session'}->param("logintype") eq "admin";
    my $r=shift;
    my $module=$r->param("module");
-   $self->{'moduleinfo'}=$self->{'ldap'}->getEntriesAsHashRef("ispmanModule=$module, ou=conf, @{[$self->getConf('ldapBaseDN')]}", "objectclass=ispmanConfVar");
+   $self->{'moduleinfo'}=$self->{'ldap'}->getEntriesAsHashRef($self->getConfModuleDN($module), "objectclass=ispmanConfVar");
    my $template=$self->getTemplate("modules/editModule.tmpl");
    print $template->fill_in(PACKAGE => "ISPMan");
 }
@@ -101,7 +101,6 @@
    my ($module, $var,$val)=@_;
    my $dn="ispmanVar=$var, ispmanModule=$module, ou=conf, @{[$self->getConf('ldapBaseDN')]}";
    $self->updateEntryWithData($dn, {'ispmanVal' => $val});
-
 }
 
 sub modifyModule {




-------------------------------------------------------
This SF.net email is sponsored by: Perforce Software.
Perforce is the Fast Software Configuration Management System offering
advanced branching capabilities and atomic changes on 50+ platforms.
Free Eval! http://www.perforce.com/perforce/loadprog.html