X-Git-Url: http://git.rot13.org/?p=BackupPC.git;a=blobdiff_plain;f=bin%2FBackupPC_sendEmail;h=4ba2778328d32e529ca06a0d5749d03c27c452fd;hp=b41eb9a31defa4c127d7561cf2b9a192e2ad7d9b;hb=8a5f496e93ee77491746cb72ef9949ab91c82dae;hpb=dcf156b7d70fbe2f114c1fed738f613d0b1a2775 diff --git a/bin/BackupPC_sendEmail b/bin/BackupPC_sendEmail index b41eb9a..4ba2778 100755 --- a/bin/BackupPC_sendEmail +++ b/bin/BackupPC_sendEmail @@ -38,7 +38,7 @@ #======================================================================== use strict; -use lib "__INSTALLDIR__/lib"; +use lib "/usr/local/BackupPC/lib"; use BackupPC::Lib; use BackupPC::FileZIO; @@ -282,7 +282,7 @@ if ( !$opts{t} ) { my $dumpStr = Data::Dumper->Dump( [\%UserEmailInfo], [qw(*UserEmailInfo)]); - if ( open(HOST, ">$TopDir/log/UserEmailInfo.pl") ) { + if ( open(HOST, ">", "$TopDir/log/UserEmailInfo.pl") ) { print(HOST $dumpStr); close(HOST); }