X-Git-Url: https://feistymeow.org/gitweb/?a=blobdiff_plain;f=scripts%2Fcore%2Fgenerate_aliases.pl;h=2f87acc009d346275454980d89611a8b06db34b1;hb=f6066f2fa1be664694756f980e25f3d0a4b8228b;hp=50e4bd5676780b0c0868382f63fd0671c2187962;hpb=649014ac617023bc07835be770fb6bfa03c9e301;p=feisty_meow.git diff --git a/scripts/core/generate_aliases.pl b/scripts/core/generate_aliases.pl index 50e4bd56..2f87acc0 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 SHELL_DEBUG ); +use Env qw(FEISTY_MEOW_BINARIES BUILD_TOP FEISTY_MEOW_APEX FEISTY_MEOW_LOADING_DOCK FEISTY_MEOW_SCRIPTS DEBUG_FEISTY_MEOW ); # 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 @@ -78,14 +78,14 @@ sub load_file_names { # loaded also. sub rebuild_script_aliases { - if (length($SHELL_DEBUG)) { + if (length($DEBUG_FEISTY_MEOW)) { print "rebuilding generated aliases file...\n"; } # create our generated shells directory if it's not already. if ( ! -d $FEISTY_MEOW_LOADING_DOCK ) { mkdir $FEISTY_MEOW_LOADING_DOCK; - if (length($SHELL_DEBUG)) { + if (length($DEBUG_FEISTY_MEOW)) { print "made FEISTY_MEOW_LOADING_DOCK at '$FEISTY_MEOW_LOADING_DOCK'\n"; } } @@ -100,7 +100,7 @@ sub rebuild_script_aliases { foreach $i (&glob_list("$FEISTY_MEOW_LOADING_DOCK/custom/*.alias")) { if (-f $i) { push(@ALIAS_DEFINITION_FILES, $i); } } - if (length($SHELL_DEBUG)) { + if (length($DEBUG_FEISTY_MEOW)) { print "using these alias files:\n"; foreach $i (@ALIAS_DEFINITION_FILES) { local $base_of_dir = &basename(&dirname($i)); @@ -112,7 +112,7 @@ sub rebuild_script_aliases { # write the aliases for sh and bash scripts. local $GENERATED_ALIAS_FILE = "$FEISTY_MEOW_LOADING_DOCK/fmc_core_and_custom_aliases.sh"; - if (length($SHELL_DEBUG)) { + if (length($DEBUG_FEISTY_MEOW)) { print "writing generated aliases in $GENERATED_ALIAS_FILE...\n"; } @@ -142,7 +142,7 @@ sub rebuild_script_aliases { close GENOUT; - if (length($SHELL_DEBUG)) { + if (length($DEBUG_FEISTY_MEOW)) { print("done rebuilding generated aliases file.\n"); } } @@ -184,7 +184,7 @@ if (-d $FEISTY_MEOW_BINARIES) { # trash the old versions. unlink("$FEISTY_MEOW_LOADING_DOCK/fmc_aliases_for_scripts.sh"); -if (length($SHELL_DEBUG)) { +if (length($DEBUG_FEISTY_MEOW)) { printf "writing $FEISTY_MEOW_LOADING_DOCK/fmc_aliases_for_scripts.sh...\n"; }