[LON-CAPA-cvs] cvs: loncom / lond

[albertel]

albertel		Wed May 17 22:32:13 2006 EDT

  Modified files:              
    /loncom	lond 
  Log:
  - style police
  
  
  
Index: loncom/lond
diff -u loncom/lond:1.327 loncom/lond:1.328
--- loncom/lond:1.327	Wed May 17 22:17:27 2006
+++ loncom/lond	Wed May 17 22:32:06 2006
@@ -2,7 +2,7 @@
 # The LearningOnline Network
 # lond "LON Daemon" Server (port "LOND" 5663)
 #
-# $Id: lond,v 1.327 2006/05/18 02:17:27 www Exp $
+# $Id: lond,v 1.328 2006/05/18 02:32:06 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -60,7 +60,7 @@
 my $lastlog='';
 my $lond_max_wait_time = 13;
 
-my $VERSION='$Revision: 1.327 $'; #' stupid emacs
+my $VERSION='$Revision: 1.328 $'; #' stupid emacs
 my $remoteVERSION;
 my $currenthostid="default";
 my $currentdomainid;
@@ -1052,11 +1052,11 @@
 # Are we reading or writing?
         if ($how eq &GDBM_READER()) {
 # We are reading
-           unless (open($sym,"$file_prefix.db.lock")) {
+           if (!open($sym,"$file_prefix.db.lock")) {
 # We don't have a lock file. This could mean
 # - that there is no such db-file
 # - that it does not have a lock file yet
-               unless ((-e "$file_prefix.db") || (-e "$file_prefix.db.gz")) {
+               if ((! -e "$file_prefix.db") && (! -e "$file_prefix.db.gz")) {
 # No such file. Forget it.                
                    $! = 2;
                    return undef;