ignoring mac's .DS_Store items now.

[feisty_meow.git] / scripts / text / diff_lib.pl

diff --git a/scripts/text/diff_lib.pl b/scripts/text/diff_lib.pl
index 4642946dca4036eb7a5d227145c8c55507569741..6b194c2f64fcd82e1546a6a321ab7b69447a669d 100644 (file)
--- 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";
@@ -191,7 +191,7 @@ synch_build:
 This program needs one directory name to be passed on the command line.
 This directory is where the installation's executable files live.  Any files
 that are in the installation bin directory will be compared against the files
-in the build repository (specified by an environment variable REPOSITORY_DIR).
+in the build repository (specified by an environment variable FEISTY_MEOW_DIR).
 If files differ, they will be copied from the repository into the installation
 directory.
 ";
@@ -490,12 +490,12 @@ sub synchronize_against_build
   }
 
 #  print "install=$install_directory\n";
-#  print "repos=$REPOSITORY_DIR\n";
+#  print "repos=$FEISTY_MEOW_DIR\n";
 
   # iterate over all the files in the source directory.
   opendir CURDIR, $install_directory
       || die("couldn't open $install_directory for reading.\n");
-  $compare_directory = "$REPOSITORY_DIR/dll";
+  $compare_directory = "$FEISTY_MEOW_DIR/dll";
   foreach $filename (readdir CURDIR) {
     if ( ($filename eq ".") || ($filename eq "..") ) { next; }
     if (! ($filename =~ /\.dll$/)) { next; }
@@ -514,7 +514,7 @@ sub synchronize_against_build
   # repeat for the exe directory.
   opendir CURDIR, $install_directory
       || die("couldn't open $install_directory for reading.\n");
-  $compare_directory = "$REPOSITORY_DIR/exe";
+  $compare_directory = "$FEISTY_MEOW_DIR/exe";
   foreach $filename (readdir CURDIR) {
     if ( ($filename eq ".") || ($filename eq "..") ) { next; }
     if (! ($filename =~ /\.exe$/)) { next; }