Changeset 17 for trunk/cgi-bin/main.cgi

Timestamp:

10/25/04 17:33:36 (20 years ago)

Author:

Kris Deugau

Message:

Fixed incorrect syslog error statements

File:

• trunk/cgi-bin/main.cgi (modified) (9 diffs)

trunk/cgi-bin/main.cgi

@@ -138 +138 @@
     carp "Transaction aborted because $@";
     eval { $ip_dbh->rollback; };
-    syslog "error", "Could not add master block '$webvar{cidr}' to database: '$@'";
+    syslog "err", "Could not add master block '$webvar{cidr}' to database: '$@'";
     printAndExit("Could not add master block $webvar{cidr} to database");
   }
@@ -947 +947 @@
     if ($sth->err) {
       printAndExit("Allocation of $cidr to $webvar{custid} failed: '".$sth->errstr."'");
-      syslog "error", "Allocation of $cidr to $webvar{custid} by $authuser failed: ".
+      syslog "err", "Allocation of $cidr to $webvar{custid} by $authuser failed: ".
         "'".$sth->errstr."'";
     }
@@ -998 +998 @@
         carp "Transaction aborted because $@";
         eval { $ip_dbh->rollback; };
-        syslog "error", "Allocation of '$webvar{fullcidr}' to '$webvar{custid}' as ".
+        syslog "err", "Allocation of '$webvar{fullcidr}' to '$webvar{custid}' as ".
                 "'$webvar{alloctype}' by $authuser failed: '$@'";
         printAndExit("Allocation of $cidr as $full_alloc_types{$webvar{alloctype}} failed.\n");
@@ -1064 +1064 @@
         carp "Transaction aborted because $@";
         eval { $ip_dbh->rollback; };
-        syslog "error", "Allocation of '$webvar{fullcidr}' to '$webvar{custid}' as ".
+        syslog "err", "Allocation of '$webvar{fullcidr}' to '$webvar{custid}' as ".
                 "'$webvar{alloctype}' by $authuser failed: '$@'";
         printAndExit("Allocation of $cidr as $full_alloc_types{$webvar{alloctype}} failed.\n");
@@ -1090 +1090 @@
       carp "Transaction aborted because $@";
       eval { $ip_dbh->rollback; };
-      syslog "error", "Initialization of pool '$webvar{fullcidr}' by $authuser failed: '$@'";
+      syslog "err", "Initialization of pool '$webvar{fullcidr}' by $authuser failed: '$@'";
       printAndExit("$full_alloc_types{$webvar{alloctype}} $webvar{fullcidr} not completely initialized.");
     }
@@ -1232 +1232 @@
     carp "Transaction aborted because $@";
     eval { $ip_dbh->rollback; };
-    syslog "error", "$authuser could not update block/IP '$webvar{block}': '$@'";
+    syslog "err", "$authuser could not update block/IP '$webvar{block}': '$@'";
     printAndExit("Could not update block/IP $webvar{block}");
   }
@@ -1371 +1371 @@
       carp "Transaction aborted because $@";
       eval { $ip_dbh->rollback; };
-      syslog "error", "$authuser could not deallocate static IP '$webvar{block}': '$@'";
+      syslog "err", "$authuser could not deallocate static IP '$webvar{block}': '$@'";
       printAndExit("Could not deallocate static IP $webvar{block}");
     }
@@ -1389 +1389 @@
       carp "Transaction aborted because $@";
       eval { $ip_dbh->rollback; };
-      syslog "error", "$authuser could not remove master block '$webvar{block}': '$@'";
+      syslog "err", "$authuser could not remove master block '$webvar{block}': '$@'";
       printAndExit("Could not remove master block $webvar{block}");
     }
@@ -1485 +1485 @@
       carp "Transaction aborted because $@";
       eval { $ip_dbh->rollback; };
-      syslog "error", "$authuser could not deallocate netblock '$webvar{block}': '$@'";
+      syslog "err", "$authuser could not deallocate netblock '$webvar{block}': '$@'";
       printAndExit("Could not deallocate netblock $webvar{block}");
     }