X-Git-Url: https://feistymeow.org/gitweb/?a=blobdiff_plain;f=scripts%2Farchival%2Fsnarf_linux_config.pl;h=436ab523ea1ef96e3e38366d70bd8ffd1aab1153;hb=0ee49b548b0987edae2e5a19a279c82012923263;hp=7420c031e00dbf59a64b563c19d2320508d88214;hpb=7ef9f4fdbae698dff9a08189f616564d471abc45;p=feisty_meow.git diff --git a/scripts/archival/snarf_linux_config.pl b/scripts/archival/snarf_linux_config.pl index 7420c031..436ab523 100644 --- a/scripts/archival/snarf_linux_config.pl +++ b/scripts/archival/snarf_linux_config.pl @@ -15,16 +15,17 @@ # version of the License. Please send any updates to "fred@gruntose.com". ############## -require "importenv.pl"; require "shared_snarfer.pl"; +use Env qw(HOME); + &initialize_snarfer; # get the number we use and increment it for the next use. local($number) = &retrieve_number("aa_backup"); # variables used throughout. -local($snarf_file_base) = snarf_prefix("linux_config"); +local($snarf_file_base) = snarf_prefix("config-linux"); local($snarf_file) = &snarf_name($snarf_file_base, $number); # store the current archive number in the file for retrieval on the