steffen: server/perl-kolab/Kolab Kolab.pm,1.16,1.17

[cvs at intevation.de]

Author: steffen

Update of /kolabrepository/server/perl-kolab/Kolab
In directory doto:/tmp/cvs-serv9064/perl-kolab/Kolab

Modified Files:
	Kolab.pm 
Log Message:
store hashed manager password in kolab.conf to avoid rehashing each time we run kolabconf

Index: Kolab.pm
===================================================================
RCS file: /kolabrepository/server/perl-kolab/Kolab/Kolab.pm,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -d -r1.16 -r1.17
--- Kolab.pm	5 Sep 2004 12:52:20 -0000	1.16
+++ Kolab.pm	6 Sep 2004 14:00:36 -0000	1.17
@@ -126,9 +126,11 @@
     }
 
     # Make a hash of the bind password available too
-    my $hashcmd = $config{'prefix'}."/sbin/slappasswd -s '".$config{'bind_pw'}."'";
-    $config{'bind_pw_hash'} = `$hashcmd`;
-    chomp($config{'bind_pw_hash'});
+    if( !exists $config{'bind_pw_hash'} ) {
+      my $hashcmd = $config{'prefix'}."/sbin/slappasswd -s '".$config{'bind_pw'}."'";
+      $config{'bind_pw_hash'} = `$hashcmd`;
+      chomp($config{'bind_pw_hash'});
+    }
 
     # Retrieve the LDAP values of the main kolab object to complete our config hash
     if (!($tempval = URI->new($config{'ldap_uri'}))) {