X-Git-Url: https://feistymeow.org/gitweb/?a=blobdiff_plain;f=scripts%2Ftext%2Fdiff_lib.pl;h=6b194c2f64fcd82e1546a6a321ab7b69447a669d;hb=393c5d16bddb0ffef914699d2294ca2204dd16d7;hp=c0ffaf7a1e88dec7c6c4e864eb4a1cb734b3a2b7;hpb=3ea085ec301ed1399dfa1e9f3a240312dc95410b;p=feisty_meow.git diff --git a/scripts/text/diff_lib.pl b/scripts/text/diff_lib.pl index c0ffaf7a..6b194c2f 100644 --- a/scripts/text/diff_lib.pl +++ b/scripts/text/diff_lib.pl @@ -23,9 +23,9 @@ # support from CPAN. this can be installed by using cpan and telling it # install Text::Diff -require "ctime.pl"; require "filename_helper.pl"; -require "importenv.pl"; + +use Env qw(FEISTY_MEOW_DIR); use Text::Diff; @@ -146,7 +146,7 @@ sub print_header { # this function prints out the header prior to printing out any real # data. if there are no diffs, the header should never get printed. print "$break_line\n"; - local($printable_date) = &ctime(time); + local($printable_date) = scalar(localtime()); $printable_date =~ s/\n//g; print "[$printable_date]\n"; print "Left (<) is \"$temp_src\".\n";