X-Git-Url: http://git.rot13.org/?p=BackupPC.git;a=blobdiff_plain;f=bin%2FBackupPC;h=d200f5a167330d5c80ca2d02d3332d1d663db88e;hp=ae8e918025f2940d8b6df1e999eae99055c7fa1e;hb=fda25dc88a63ccac1c80efa2e4994bf0725ca9b7;hpb=fadae1eaa5482a441bc8e8aa829a063ee6a5f0c0

diff --git a/bin/BackupPC b/bin/BackupPC
index ae8e918..d200f5a 100755
--- a/bin/BackupPC
+++ b/bin/BackupPC
@@ -29,7 +29,7 @@
 #   Craig Barratt  <cbarratt@users.sourceforge.net>
 #
 # COPYRIGHT
-#   Copyright (C) 2001-2003  Craig Barratt
+#   Copyright (C) 2001-2007  Craig Barratt
 #
 #   This program is free software; you can redistribute it and/or modify
 #   it under the terms of the GNU General Public License as published by
@@ -47,7 +47,7 @@
 #
 #========================================================================
 #
-# Version 3.1.0beta0, released 3 Sep 2007.
+# Version 3.1.0, released 25 Nov 2007.
 #
 # See http://backuppc.sourceforge.net.
 #
@@ -1590,7 +1590,8 @@ sub StatusWrite
              [  \%Info, \%Status],
              [qw(*Info   *Status)]);
     $dump->Indent(1);
-    $bpc->{storage}->TextFileWrite("$LogDir/status.pl", $dump->Dump);
+    my $text = $dump->Dump;
+    $bpc->{storage}->TextFileWrite("$LogDir/status.pl", $text);
 }
 
 #