projects
/
feisty_meow.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
added docs for year in calendar format
[feisty_meow.git]
/
scripts
/
archival
/
snarf_user.pl
diff --git
a/scripts/archival/snarf_user.pl
b/scripts/archival/snarf_user.pl
index 7abd79d3b19d350e054a8d6d79c54c5350f1a8c4..2e6d6f1942de0719292d6dcd5f52bd4f11aa50c3 100644
(file)
--- 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". #
###############################################################################
# version of the License. Please send any updates to "fred@gruntose.com". #
###############################################################################
-require "importenv.pl";
require "shared_snarfer.pl";
require "shared_snarfer.pl";
+use Env qw(HOME USER);
+
&initialize_snarfer;
# get the number we use and increment it for the next use.
&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");
# 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".
# get any dot files ending in "rc", or with "bash" or "profile" in them, or
# that start with "x".