Commit 4260f0c9 authored by Ian Lynagh's avatar Ian Lynagh
Browse files

Fix darcs-all get

parent 2cd93039
......@@ -98,7 +98,7 @@ sub darcsget {
open IN, "< packages" or die "Can't open packages file";
while (<IN>) {
chomp;
if (/^([^ ]+) +(?:([^ ]+) +)?([^ ]+)/) {
if (/^([^ ]+) +(?:([^ ]+) +)?([^ ]+) +([^ ]+)$/) {
$localpath = $1;
$tag = defined($2) ? $2 : "";
$remotepath = $3;
......@@ -119,7 +119,7 @@ sub darcsget {
}
}
}
elsif (! /^$/) {
elsif (! /^(#.*)?$/) {
die "Bad line: $_";
}
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment