Wed Nov 23 19:59:29 EST 2005 Mark Stosberg <[EMAIL PROTECTED]>
* some TODO tests for darcs --commands [Issue9]
These tests expose two bugs:
- cd /; darcs --commands doesn't work
- darcs --commands outside of repos reports too many commands, like get.
New patches:
[some TODO tests for darcs --commands [Issue9]
Mark Stosberg <[EMAIL PROTECTED]>**20051124005929
These tests expose two bugs:
- cd /; darcs --commands doesn't work
- darcs --commands outside of repos reports too many commands, like get.
]
<
> {
addfile ./tests/commands.pl
hunk ./tests/commands.pl 1
+#!/usr/bin/env perl
+
+# Some tests for 'darcs --commands'
+
+use Test::More qw/no_plan/;
+use lib ('lib/perl');
+use Test::Darcs;
+use strict;
+use Cwd;
+use vars qw/$DARCS/;
+
+die 'darcs not found' unless $ENV{DARCS} || (-x "$ENV{PWD}/../darcs");
+$DARCS = $ENV{DARCS} || "$ENV{PWD}/../darcs";
+
+OUTSIDE_REPO_REALITY_CHECK: {
+ local $TODO = 'Needs Haskell coder to fix';
+ my $test_name = "reality check --commands outside repo";
+ chdir '/';
+ SKIP: {
+ skip "can't get out darcs repo space", 2 if (-d '_darcs');
+ my $out = darcs("--commands");
+ like($out , qr/get/, "get is listed as valid command outside of a repo");
+ unlike($out , qr/get/, $test_name);
+ print $out;
+ }
+}
}
Context:
[TAG 1.0.7
Tommy Pettersson <[EMAIL PROTECTED]>**20060513171438]
Patch bundle hash:
17c6d31e75038bebd4ecaba44d2ff8ee9ac8800b
_______________________________________________
darcs-devel mailing list
[email protected]
http://www.abridgegame.org/cgi-bin/mailman/listinfo/darcs-devel
