summaryrefslogtreecommitdiff
path: root/darcs-all
diff options
context:
space:
mode:
authorIan Lynagh <igloo@earth.li>2008-08-07 20:32:58 +0000
committerIan Lynagh <igloo@earth.li>2008-08-07 20:32:58 +0000
commit4260f0c9b38d9b8b5851eae021d0a45a90719ef0 (patch)
treec43aadc4af94a714bed97f789856a636ca6afda7 /darcs-all
parent2cd930397966d27a221998c8ac060151e2027e90 (diff)
downloadhaskell-4260f0c9b38d9b8b5851eae021d0a45a90719ef0.tar.gz
Fix darcs-all get
Diffstat (limited to 'darcs-all')
-rw-r--r--darcs-all4
1 files changed, 2 insertions, 2 deletions
diff --git a/darcs-all b/darcs-all
index 0272df55f1..6c8b406cf3 100644
--- a/darcs-all
+++ b/darcs-all
@@ -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: $_";
}
}