From 8bfb60a368487a8ffa1e0b20543becc4bea0806b Mon Sep 17 00:00:00 2001
From: Michael Forney <mforney@mforney.org>
Date: Tue, 10 Oct 2017 02:45:46 -0700
Subject: fetch-curl: Allow overriding substitutions

---
 scripts/fetch-curl.rc | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

(limited to 'scripts')

diff --git a/scripts/fetch-curl.rc b/scripts/fetch-curl.rc
index edc2b6e5..a525bcdf 100644
--- a/scripts/fetch-curl.rc
+++ b/scripts/fetch-curl.rc
@@ -1,7 +1,7 @@
 flag e +
 
 if(~ $#* 0) {
-	echo 'usage: fetch-curl.rc dir pattern...' >[1=2]
+	echo 'usage: fetch-curl.rc dir [paxflags...]' >[1=2]
 	exit 2
 }
 
@@ -26,15 +26,15 @@ for(archive in `{awk '{print $2}' sha256}) {
 	case *
 		tool=()
 	}
-	pats=()
+	flags=()
 	while(! ~ $1 '' ';') {
-		pats=($pats $1)
+		flags=($flags $1)
 		shift
 	}
-	if(~ $#pats 0)
-		pats='*/*'
+	if(~ $#flags 0)
+		flags=(-s '/^\.\|[^\/]*/src/' '*/*')
 	shift
-	if(! ~ $#tool 0) $tool $archive | pax -r -s '/^\.\|[^\/]*/src/' $pats
+	if(! ~ $#tool 0) $tool $archive | pax -r $flags
 }
 
 if([ -d patch ]) {
-- 
cgit v1.2.3