kup: disallow attaching arguments directly to -p
In accordance with the previous checkin, do not allow attaching an
argument directly to the -p option.
Signed-off-by: H. Peter Anvin <hpa@zytor.com>
diff --git a/kup b/kup
index abf768b..c881ae2 100755
--- a/kup
+++ b/kup
@@ -291,8 +291,8 @@
if ($remote_tree eq '-p' || $remote_tree eq '--prefix') {
$prefix = shift @args;
$remote_tree = shift @args;
- } elsif ($remote_tree =~ /^(-p|--prefix=)(.+)$/) {
- $prefix = $2;
+ } elsif ($remote_tree =~ /^--prefix=(.+)$/) {
+ $prefix = $1;
$remote_tree = shift @args;
}