resolve issue1877: make pull --dry-run --xml terse -------------------------------------------------- > - when (old_default == repodirs) $ > + when (old_default == repodirs && not (XMLOutput `elem` opts)) $ > let pulling = if DryRun `elem` opts then "Would pull" else "Pulling" > in putInfo opts $ text $ pulling++" from "++concatMap formatPath > repodirs++"..." > (Sealed them, Sealed compl) <- readRepos repository opts repodirs
Hmm, that was easy. Thanks and sorry for the inefficient delegation! Applied, with a mv patch on top of it to rename the failing test to a passing one. -- Eric Kow <http://www.nltg.brighton.ac.uk/home/Eric.Kow> PGP Key ID: 08AC04F9
signature.asc
Description: Digital signature
_______________________________________________ darcs-users mailing list darcs-users@darcs.net http://lists.osuosl.org/mailman/listinfo/darcs-users