From c524e26de79e443bd414b9fcd43ab92ecc791172 Mon Sep 17 00:00:00 2001 From: Chris Koeritz Date: Fri, 18 Oct 2013 09:57:05 -0400 Subject: [PATCH] tossed a couple antiquated scripts, removed QUARTZ_DIR which is no longer used. --- customizing/fred/fred_variables.sh | 3 -- scripts/archival/snarf_fred_data.pl | 52 ----------------------------- scripts/archival/snarf_quartz.pl | 50 --------------------------- 3 files changed, 105 deletions(-) delete mode 100644 scripts/archival/snarf_fred_data.pl delete mode 100644 scripts/archival/snarf_quartz.pl diff --git a/customizing/fred/fred_variables.sh b/customizing/fred/fred_variables.sh index 50c86ee1..2f13d5e5 100644 --- a/customizing/fred/fred_variables.sh +++ b/customizing/fred/fred_variables.sh @@ -4,9 +4,6 @@ if [ -z "$NETHACKOPTIONS" ]; then # if we don't see the nethack variable defined, this probably hasn't run yet. - # The quartz directory has *really* personalized items. - export QUARTZDIR=$HOME/quartz - # The cloud directory is our new repository that's always available. It serves as our # personal cloud for data. export CLOUD_DIR=$HOME/cloud diff --git a/scripts/archival/snarf_fred_data.pl b/scripts/archival/snarf_fred_data.pl deleted file mode 100644 index 1aff83c6..00000000 --- a/scripts/archival/snarf_fred_data.pl +++ /dev/null @@ -1,52 +0,0 @@ -#!/usr/bin/perl - -############################################################################### -# # -# Name : snarf_fred_data # -# Author : Chris Koeritz # -# Rights : Copyright (C) 2000-$now by Author # -# # -# Purpose: # -# # -# Creates an archive with all of fred's important data trees. # -# # -############################################################################### -# This program is free software; you can redistribute it and/or modify it # -# under the terms of the GNU General Public License as published by the Free # -# Software Foundation; either version 2 of the License or (at your option) # -# any later version. See: "http://www.gruntose.com/Info/GNU/GPL.html" for a # -# version of the License. Please send any updates to "fred@gruntose.com". # -############################################################################### - -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 for directory location to backup and the file to dump it in. -local($root) = "$HOME"; -local($snarf_file_base) = &snarf_prefix("fred_data"); -local($snarf_file) = &snarf_name($snarf_file_base, $number); - -# store the archive number in the file for retrieval on the other side. -&backup_number("aa_backup", $snarf_file_base, $number); - -############################################################################ - -&backup_hierarchy($snarf_file_base, $number, "$root", "cloud"); -&backup_hierarchy($snarf_file_base, $number, "$root", "ebooks"); -&backup_hierarchy($snarf_file_base, $number, "$root", "feisty_meow"); -&backup_hierarchy($snarf_file_base, $number, "$root", "quartz"); -&backup_hierarchy($snarf_file_base, $number, "$root", "web"); - -############################################################################ - -# now rename the file so only the unpacker can access it. -&rename_archive($snarf_file); - -exit 0; - diff --git a/scripts/archival/snarf_quartz.pl b/scripts/archival/snarf_quartz.pl deleted file mode 100644 index b9d54a30..00000000 --- a/scripts/archival/snarf_quartz.pl +++ /dev/null @@ -1,50 +0,0 @@ -#!/usr/bin/perl - -############################################################################### -# # -# Name : snarf_quartz # -# Author : Chris Koeritz # -# Rights : Copyright (C) 2000-$now by Author # -# # -# Purpose: # -# # -# Packs up an archive with the quartz repository. # -# # -############################################################################### -# This program is free software; you can redistribute it and/or modify it # -# under the terms of the GNU General Public License as published by the Free # -# Software Foundation; either version 2 of the License or (at your option) # -# any later version. See: "http://www.gruntose.com/Info/GNU/GPL.html" for a # -# version of the License. Please send any updates to "fred@gruntose.com". # -############################################################################### - -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 for directory location to backup and the file to dump it in. -local($root) = "$HOME"; -local($snarf_file_base) = &snarf_prefix("quartz"); -local($snarf_file) = &snarf_name($snarf_file_base, $number); - -# store the archive number in the file for retrieval on the other side. -&backup_number("aa_backup", $snarf_file_base, $number); - -############################################################################ - -# backup all the hierarchies in our quartz directory, as well as any other well known -# repositories of goodness. -&backup_hierarchy($snarf_file_base, $number, "$root", "quartz"); - -############################################################################ - -# now rename the file so only the unpacker can access it. -&rename_archive($snarf_file); - -exit 0; - -- 2.34.1