nice new tool to show version of feisty meow
[feisty_meow.git] / scripts / text / new_sig.pl
index 82b2e98a5db78ed8e02ff3ac11eeb2acd674fab1..d622893df325590b07ef6478e7854c2d7295bd04 100644 (file)
@@ -19,7 +19,8 @@
 ###############################################################################
 
 require "filename_helper.pl";
-require "importenv.pl";
+
+use Env qw(HOME TMP);
 
 # creates a new signature file for outgoing email.
 local($temp_filename) = "$TMP/zz_signate";
@@ -28,7 +29,7 @@ open(FILE, ">" . $temp_filename) || die "couldn't open $temp_filename for writin
 print FILE "_______ chosen by the Nechung Oracle Program [ http://gruntose.com/ ] _______\n";
 print FILE "\n";
 close(FILE);
-local($bindir) = $ENV{'BINDIR'};
+local($bindir) = $ENV{'FEISTY_MEOW_BINARIES'};
 $bindir = &sanitize_name($bindir);
 system("$bindir/nechung >>$temp_filename");
 ###always hits this.  nechung gives an error? || die "couldn't run nechung.";