ispman/lib/ISPMan DomainMan.pm,1.55,1.56

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

Modified Files:
	DomainMan.pm 
Log Message:
fixed perl warning

Index: DomainMan.pm
===================================================================
RCS file: /cvsroot/ispman/ispman/lib/ISPMan/DomainMan.pm,v
retrieving revision 1.55
retrieving revision 1.56
diff -u -d -r1.55 -r1.56
--- DomainMan.pm	9 Jan 2004 00:49:59 -0000	1.55
+++ DomainMan.pm	6 Feb 2004 22:24:52 -0000	1.56
@@ -1133,7 +1133,7 @@
    my $domain=shift;
    
 
-   if ($self->isDomainLocked($domain) eq "true"){
+   if ($self->isDomainLocked($domain) && $self->isDomainLocked($domain) eq "true"){
       if ($self->domainLockedBy($domain) eq $self->{'REMOTE_USER'}) {
          return 1;
       } else {



-------------------------------------------------------
The SF.Net email is sponsored by EclipseCon 2004
Premiere Conference on Open Tools Development and Integration
See the breadth of Eclipse activity. February 3-5 in Anaheim, CA.
http://www.eclipsecon.org/osdn