- fixed configure.pl and makeDist.

[BackupPC.git] / lib / BackupPC / CGI / ReloadServer.pm

diff --git a/lib/BackupPC/CGI/ReloadServer.pm b/lib/BackupPC/CGI/ReloadServer.pm
index 13b66b2..97d027d 100644 (file)
--- a/lib/BackupPC/CGI/ReloadServer.pm
+++ b/lib/BackupPC/CGI/ReloadServer.pm
@@ -28,7 +28,7 @@
 #
 #========================================================================
 #
-# Version 2.1.0_CVS, released 3 Jul 2003.
+# Version 3.0.0alpha, released 23 Jan 2006.
 #
 # See http://backuppc.sourceforge.net.
 #
@@ -41,10 +41,9 @@ use BackupPC::CGI::Lib qw(:all);
 
 sub action
 {
-    if ( defined($bpc) ) {
-        $bpc->ServerMesg("log User $User requested server configuration reload");
-        $bpc->ServerMesg("server reload");
-    }
+    ServerConnect();
+    $bpc->ServerMesg("log User $User requested server configuration reload");
+    $bpc->ServerMesg("server reload");
     print $Cgi->redirect($MyURL);
 }