# 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.
############################################################################
# get top level text files and other potentially important items...
-&backup_files($snarf_file_base, $number, $root, ".", ("*.html", "*.txt"));
+&backup_files($snarf_file_base, $number, $root, ".", ("*.html", "*.txt", "makefile*"));
# gather any directories in our home that match these often recurring patterns.
&snarf_by_pattern($snarf_file_base, "$root", "crucial");
+&snarf_by_pattern($snarf_file_base, "$root", "Documents");
&snarf_by_pattern($snarf_file_base, "$root", "idea");
&snarf_by_pattern($snarf_file_base, "$root", "issue");
&snarf_by_pattern($snarf_file_base, "$root", "list");
&snarf_by_pattern($snarf_file_base, "$root", "note");
+&snarf_by_pattern($snarf_file_base, "$root", "nuage");
&snarf_by_pattern($snarf_file_base, "$root", "project");
+&snarf_by_pattern($snarf_file_base, "$root", "proj_");
&snarf_by_pattern($snarf_file_base, "$root", "task");
+&snarf_by_pattern($snarf_file_base, "$root", "invention");
+&snarf_by_pattern($snarf_file_base, "$root", "transitory");
############################################################################