$HOME: "/home/lace" -> "/home/short"

 - temporary cludge for Paulina compatibility

diff --git a/perlmail-sendmail b/perlmail-sendmail
index e2ff291..3b50a0d 100755 (executable)
--- a/perlmail-sendmail
+++ b/perlmail-sendmail
@@ -14,7 +14,7 @@ require Mail::Address;
 require File::Basename;
 
 my $sendmail_orig=(-x ($_="/usr/sbin/sendmail-orig") ? $_ : "/usr/sbin/sendmail");
-my $HOME="/home/lace";
+my $HOME="/home/short";
 my $opt_F;
 sub FromAddress
 {