X-Git-Url: https://feistymeow.org/gitweb/?a=blobdiff_plain;f=scripts%2Fcore%2Fgenerate_aliases.pl;h=2820216613053297a8b2dd19c23a6745128bfd90;hb=3155ceca921689eaaf564e61acb7925daf177f22;hp=2f6604cb1a4200f2503c2f538852b6563cc59c00;hpb=5e566241764a1d60bddcf177fd50714dec9ba1f4;p=feisty_meow.git diff --git a/scripts/core/generate_aliases.pl b/scripts/core/generate_aliases.pl index 2f6604cb..28202166 100644 --- a/scripts/core/generate_aliases.pl +++ b/scripts/core/generate_aliases.pl @@ -23,7 +23,7 @@ require "filename_helper.pl"; -use Env qw(FEISTY_MEOW_BINARIES BUILD_TOP FEISTY_MEOW_APEX FEISTY_MEOW_LOADING_DOCK FEISTY_MEOW_SCRIPTS DEBUG_FEISTY_MEOW ); +use Env qw(FEISTY_MEOW_BINARIES BUILD_TOP FEISTY_MEOW_APEX FEISTY_MEOW_LOADING_DOCK FEISTY_MEOW_SCRIPTS DEBUG_FEISTY_MEOW HOME ); # given a possible aliasable filename, this will decide whether to create a perl # or bash alias for it. it needs the filename of the possible alias and the @@ -170,7 +170,8 @@ if (! -d $FEISTY_MEOW_LOADING_DOCK) { # set the executable bit for binaries for just this current user. if (-d $FEISTY_MEOW_BINARIES) { - system("find \"$FEISTY_MEOW_BINARIES\" -type f -exec chmod u+x \"{}\" ';'"); +print "hey, debugging code here in generate_aliases.pl\n"; + system("find \"$FEISTY_MEOW_BINARIES\" -type f -exec chmod u+x \"{}\" ';' 2>$HOME/complaints_from_binary_chmod.txt"); } ##############