From: Chris Koeritz <fred@gruntose.com>
Date: Wed, 9 May 2018 23:26:29 +0000 (+0000)
Subject: fixed for adding links as real content
X-Git-Tag: 2.140.112^2~52
X-Git-Url: https://feistymeow.org/gitweb/?a=commitdiff_plain;h=fe67750a199465234387dbf3de15a90b5f564c17;p=feisty_meow.git

fixed for adding links as real content

had to add link following to find command, and then magically our link
content was getting backed up.  whew.
---

diff --git a/scripts/archival/shared_snarfer.pl b/scripts/archival/shared_snarfer.pl
index efa6bd20..60845421 100644
--- a/scripts/archival/shared_snarfer.pl
+++ b/scripts/archival/shared_snarfer.pl
@@ -168,7 +168,7 @@ sub snarfer {
   chdir($root);
 
   local($outcome) = 0;
-  my @lines = qx( $find_tool "$subdir" @extra_flags "-type" "f" );
+  my @lines = qx( $find_tool "$subdir" @extra_flags "-follow" "-type" "f" );
 #  if ( ($! != 0) || ($? != 0) ) {
 #    die("failure to find files in $subdir"); 
 #  }
@@ -227,9 +227,10 @@ sub snarf_file_list {
     }
     local($outcome) = 0xff & system $tar_tool,
 #"--directory=" . "$root",
-        @extra_flags, 
+
 #hmmm: trying to dereference symbolic links and stop missing stuff.
 "-h",
+        @extra_flags, 
 "-rf", &canonicalize($target_file), @excludes, $i;
     if ($outcome) { die("failure to archive"); }
   }