From bb2aa6e9fdbbf4723eacdaf5937a8855ff41509d Mon Sep 17 00:00:00 2001 From: Johannes 'josch' Schauer Date: Tue, 2 Oct 2018 04:09:18 +0200 Subject: [PATCH] prevent a 'deb...' mirror argument from being handled by the '://' case --- mmdebstrap | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/mmdebstrap b/mmdebstrap index d357112..5726e2b 100755 --- a/mmdebstrap +++ b/mmdebstrap @@ -682,10 +682,10 @@ sub setup { # read from stdin print STDERR "I: Reading sources.list from standard input...\n"; copy *STDIN, $fh or die "cannot copy stdin: $!"; - } elsif ($arg =~ /:\/\//) { - print $fh "deb$archopt $arg $options->{suite} $options->{components}\n"; } elsif ($arg =~ /^deb(-src)? /) { print $fh "$arg\n"; + } elsif ($arg =~ /:\/\//) { + print $fh "deb$archopt $arg $options->{suite} $options->{components}\n"; } elsif (-f $arg) { copy($arg, $fh) or die "cannot copy $arg: $!"; } else {