From 4260f0c9b38d9b8b5851eae021d0a45a90719ef0 Mon Sep 17 00:00:00 2001
From: Ian Lynagh <igloo@earth.li>
Date: Thu, 7 Aug 2008 20:32:58 +0000
Subject: [PATCH] Fix darcs-all get

---
 darcs-all |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/darcs-all b/darcs-all
index 0272df5..6c8b406 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: $_";
         }
     }
-- 
1.7.10.4