From bf2ed28e98f69247d9881a08d88f67091c581646 Mon Sep 17 00:00:00 2001
From: Don Armstrong <don@donarmstrong.com>
Date: Wed, 22 Feb 2006 10:08:58 +0000
Subject: [PATCH] stop using User in sa

---
 sa | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/sa b/sa
index 6cacfda..6772c51 100755
--- a/sa
+++ b/sa
@@ -46,7 +46,7 @@ Display this manual.
 
 
 
-use User;
+#use User;
 use IO::File;
 use vars qw($DEBUG $VERBOSE);
 
@@ -92,7 +92,7 @@ sub parse_config_file {
      }
 }
 
-my $HOME=User->Home;
+my $HOME=$ENV{HOME};
 my $HOSTNAME=qx(hostname);
 $HOSTNAME=~s/\n//g;
 my $CAN_IGNORE_EXTERNALS = 0;
-- 
2.39.2