X-Git-Url: http://git.rot13.org/?p=BackupPC.git;a=blobdiff_plain;f=bin%2FBackupPC_sendEmail;h=d9e1c7e2a8f8b5ebc9c8299a4eaa6fbd7ad67bc5;hp=d5d4e006af83191beac0f869d303233e8bba2d69;hb=72b87b178ae8dcc10f1ae0f441d13e30d5f1ecf1;hpb=9175f9157f0d54b50ebf11d2036c20f50ffc6d9d

diff --git a/bin/BackupPC_sendEmail b/bin/BackupPC_sendEmail
index d5d4e00..d9e1c7e 100755
--- a/bin/BackupPC_sendEmail
+++ b/bin/BackupPC_sendEmail
@@ -13,7 +13,7 @@
 #   Craig Barratt  <cbarratt@users.sourceforge.net>
 #
 # COPYRIGHT
-#   Copyright (C) 2001  Craig Barratt
+#   Copyright (C) 2001-2003  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
@@ -31,13 +31,14 @@
 #
 #========================================================================
 #
-# Version 2.0.0_CVS, released 3 Feb 2003.
+# Version 2.1.0_CVS, released 3 Jul 2003.
 #
 # See http://backuppc.sourceforge.net.
 #
 #========================================================================
 
 use strict;
+no  utf8;
 use lib "/usr/local/BackupPC/lib";
 use BackupPC::Lib;
 use BackupPC::FileZIO;
@@ -59,8 +60,7 @@ use vars qw(%UserEmailInfo);
 do "$TopDir/log/UserEmailInfo.pl";
 
 my %opts;
-getopts("t", \%opts);
-if ( @ARGV != 0 ) {
+if ( !getopts("t", \%opts) || @ARGV != 0 ) {
     print("usage: $0 [-t]\n");
     exit(1);
 }
@@ -283,6 +283,7 @@ if ( !$opts{t} ) {
              [\%UserEmailInfo],
              [qw(*UserEmailInfo)]);
     if ( open(HOST, ">", "$TopDir/log/UserEmailInfo.pl") ) {
+	binmode(HOST);
         print(HOST $dumpStr);
         close(HOST);
     }