Changes

From SME Server
Jump to navigationJump to search
2 bytes removed ,  18:06, 5 December 2009
m
Fix whitespace issues in code block
Line 101: Line 101:  
     my $pw = $rec->prop('DbPassword');
 
     my $pw = $rec->prop('DbPassword');
 
     return "" if $pw;
 
     return "" if $pw;
   
     $rec->set_prop('DbPassword', MIME::Base64::encode(int( (1000000000000000) * rand() )));
 
     $rec->set_prop('DbPassword', MIME::Base64::encode(int( (1000000000000000) * rand() )));
   
  }
 
  }
  

Navigation menu