freeside/FS/FS svc_acct.pm,1.180,1.181

[Ivan Kohler]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory pouncequick:/tmp/cvs-serv23867

Modified Files:
	svc_acct.pm 
Log Message:
fix quick crypt_password bug when its passwd an empty param

Index: svc_acct.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/svc_acct.pm,v
retrieving revision 1.180
retrieving revision 1.181
diff -u -d -r1.180 -r1.181
--- svc_acct.pm	19 May 2005 11:05:21 -0000	1.180
+++ svc_acct.pm	22 May 2005 23:38:23 -0000	1.181
@@ -1327,7 +1327,7 @@
   {
     $self->_password;
   } else {
-    my $encryption = scalar(@_) ? shift : 'crypt';
+    my $encryption = ( scalar(@_) && $_[0] ) ? shift : 'crypt';
     if ( $encryption eq 'crypt' ) {
       crypt(
         $self->_password,