X-Git-Url: https://feistymeow.org/gitweb/?a=blobdiff_plain;f=scripts%2Farchival%2Fsnarf_user.pl;h=2e6d6f1942de0719292d6dcd5f52bd4f11aa50c3;hb=2eab636d6e37cd612c1a77bb50d4e30458724f6a;hp=7abd79d3b19d350e054a8d6d79c54c5350f1a8c4;hpb=7ef9f4fdbae698dff9a08189f616564d471abc45;p=feisty_meow.git diff --git a/scripts/archival/snarf_user.pl b/scripts/archival/snarf_user.pl index 7abd79d3..2e6d6f19 100644 --- a/scripts/archival/snarf_user.pl +++ b/scripts/archival/snarf_user.pl @@ -18,9 +18,10 @@ # version of the License. Please send any updates to "fred@gruntose.com". # ############################################################################### -require "importenv.pl"; require "shared_snarfer.pl"; +use Env qw(HOME USER); + &initialize_snarfer; # get the number we use and increment it for the next use. @@ -38,6 +39,9 @@ local($snarf_file) = &snarf_name($snarf_file_base, $number); # backup all the config info for kde. &backup_hierarchy($snarf_file_base, $number, "$root", ".kde"); +# and get the config for gnome. +&backup_hierarchy($snarf_file_base, $number, "$root", ".local"); +&backup_hierarchy($snarf_file_base, $number, "$root", ".gnome*"); # get any dot files ending in "rc", or with "bash" or "profile" in them, or # that start with "x".