X-Git-Url: https://feistymeow.org/gitweb/?a=blobdiff_plain;f=scripts%2Fcore%2Fgenerate_aliases.pl;h=6662f1fb883d2cad6de99ae057b84cfd60a60ee1;hb=73762077041da828b24ffb9993bae49267f02507;hp=256be0909dc24eb1cebd5226dcf4cd51b72b6b3b;hpb=89e9af812502a016663667a857a1dd0c6fe3057f;p=feisty_meow.git diff --git a/scripts/core/generate_aliases.pl b/scripts/core/generate_aliases.pl index 256be090..6662f1fb 100644 --- a/scripts/core/generate_aliases.pl +++ b/scripts/core/generate_aliases.pl @@ -85,7 +85,9 @@ sub rebuild_script_aliases { # create our generated shells directory if it's not already. if ( ! -d $FEISTY_MEOW_GENERATED ) { mkdir $FEISTY_MEOW_GENERATED; -print "made gener dir $FEISTY_MEOW_GENERATED\n"; + if (length($SHELL_DEBUG)) { + print "made FEISTY_MEOW_GENERATED at '$FEISTY_MEOW_GENERATED'\n"; + } } # test if we can use color in ls... @@ -98,17 +100,21 @@ print "made gener dir $FEISTY_MEOW_GENERATED\n"; foreach $i (&glob_list("$FEISTY_MEOW_GENERATED/custom/*.alias")) { if (-f $i) { push(@ALIAS_DEFINITION_FILES, $i); } } - print "alias files:\n"; - foreach $i (@ALIAS_DEFINITION_FILES) { - local $base_of_dir = &basename(&dirname($i)); - local $basename = &basename($i); - print " $base_of_dir/$basename\n"; + if (length($SHELL_DEBUG)) { + print "using these alias files:\n"; + foreach $i (@ALIAS_DEFINITION_FILES) { + local $base_of_dir = &basename(&dirname($i)); + local $basename = &basename($i); + print " $base_of_dir/$basename\n"; + } } # write the aliases for sh and bash scripts. local $GENERATED_ALIAS_FILE = "$FEISTY_MEOW_GENERATED/fmc_core_and_custom_aliases.sh"; - print "writing generated aliases in $GENERATED_ALIAS_FILE...\n"; + if (length($SHELL_DEBUG)) { + print "writing generated aliases in $GENERATED_ALIAS_FILE...\n"; + } #hmmm: perhaps a good place for a function to create the header, # given the appropriate comment code. @@ -177,7 +183,9 @@ if (-d $BINDIR) { # trash the old versions. unlink("$FEISTY_MEOW_GENERATED/fmc_aliases_for_scripts.sh"); -printf "writing $FEISTY_MEOW_GENERATED/fmc_aliases_for_scripts.sh...\n"; +if (length($SHELL_DEBUG)) { + printf "writing $FEISTY_MEOW_GENERATED/fmc_aliases_for_scripts.sh...\n"; +} # open the alias files to be created. open(she, ">> $FEISTY_MEOW_GENERATED/fmc_aliases_for_scripts.sh");