require "filename_helper.pl";
-use Env qw(FEISTY_MEOW_DIR);
+use Env qw(FEISTY_MEOW_APEX);
use Text::Diff;
@name_components = split(/\//, $filename);
$basename = $name_components[$#name_components];
# print "doing diff of $filename against $compare_directory/$basename\n";
- &do_diff($filename, $compare_directory."/".$basename);
+ &compute_file_differences($filename, $compare_directory."/".$basename);
}
closedir CURDIR;
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 FEISTY_MEOW_DIR).
+in the build repository (specified by an environment variable FEISTY_MEOW_APEX).
If files differ, they will be copied from the repository into the installation
directory.
";
# checks the differences between the two files and creates appropriate output.
-sub do_diff {
+sub compute_file_differences {
local($first, $second) = @_;
# turn stupid pc slashes into normal ones.
}
# print "install=$install_directory\n";
-# print "repos=$FEISTY_MEOW_DIR\n";
+# print "repos=$FEISTY_MEOW_APEX\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 = "$FEISTY_MEOW_DIR/dll";
+ $compare_directory = "$FEISTY_MEOW_APEX/dll";
foreach $filename (readdir CURDIR) {
if ( ($filename eq ".") || ($filename eq "..") ) { next; }
if (! ($filename =~ /\.dll$/)) { next; }
# repeat for the exe directory.
opendir CURDIR, $install_directory
|| die("couldn't open $install_directory for reading.\n");
- $compare_directory = "$FEISTY_MEOW_DIR/exe";
+ $compare_directory = "$FEISTY_MEOW_APEX/exe";
foreach $filename (readdir CURDIR) {
if ( ($filename eq ".") || ($filename eq "..") ) { next; }
if (! ($filename =~ /\.exe$/)) { next; }