Handle backup in case where there is no syslog module

diff --git a/bandwidth/backup_config.pl b/bandwidth/backup_config.pl
index 6d38652..eef1a9e 100755 (executable)
--- a/bandwidth/backup_config.pl
+++ b/bandwidth/backup_config.pl
@@ -1,7 +1,9 @@
 
 do 'bandwidth-lib.pl';
 &foreign_require("firewall", "backup_config.pl");
-&foreign_require($syslog_module, "backup_config.pl");
+if ($syslog_module) {
+       &foreign_require($syslog_module, "backup_config.pl");
+       }
 
 # backup_config_files()
 # Returns files and directories that can be backed up
@@ -9,7 +11,8 @@ sub backup_config_files
 {
 # Just backup syslog and firewall
 return ( &firewall::backup_config_files(),
-        &foreign_call($syslog_module, "backup_config_files") );
+        $syslog_module ? &foreign_call($syslog_module, "backup_config_files")
+                       : ( ) );
 }
 
 # pre_backup(&files)
@@ -17,7 +20,7 @@ return ( &firewall::backup_config_files(),
 sub pre_backup
 {
 return &firewall::pre_backup() &&
-       &foreign_call($syslog_module, "pre_backup");
+       ($syslog_module ? &foreign_call($syslog_module, "pre_backup") : 1);
 }
 
 # post_backup(&files)
@@ -25,7 +28,7 @@ return &firewall::pre_backup() &&
 sub post_backup
 {
 return &firewall::post_backup() &&
-       &foreign_call($syslog_module, "post_backup");
+       ($syslog_module ? &foreign_call($syslog_module, "post_backup") : 1);
 }
 
 # pre_restore(&files)
@@ -33,7 +36,7 @@ return &firewall::post_backup() &&
 sub pre_restore
 {
 return &firewall::pre_restore() &&
-       &foreign_call($syslog_module, "pre_restore");
+       ($syslog_module ? &foreign_call($syslog_module, "pre_restore") : 1);
 }
 
 # post_restore(&files)
@@ -41,7 +44,7 @@ return &firewall::pre_restore() &&
 sub post_restore
 {
 return &firewall::post_restore() &&
-       &foreign_call($syslog_module, "post_restore");
+       ($syslog_module ? &foreign_call($syslog_module, "post_restore") : 1);
 }
 
 1;