summaryrefslogtreecommitdiff
path: root/t/60-bin-efa.t
diff options
context:
space:
mode:
authorDaniel Friesel <derf@derf.homelinux.org>2010-08-14 11:31:26 +0200
committerDaniel Friesel <derf@derf.homelinux.org>2010-08-14 11:31:26 +0200
commit49bca5b7fafffc9dc42660fc13c7931cd243426d (patch)
tree1da91abf5633751d85bfecc063c55061921d4725 /t/60-bin-efa.t
parentb9c18d6739b79a645a14df5bb51f24987a6ef308 (diff)
Remove 'time' option from WWW::Efa
Diffstat (limited to 't/60-bin-efa.t')
-rw-r--r--t/60-bin-efa.t14
1 files changed, 12 insertions, 2 deletions
diff --git a/t/60-bin-efa.t b/t/60-bin-efa.t
index 2b60233..0ae0b1f 100644
--- a/t/60-bin-efa.t
+++ b/t/60-bin-efa.t
@@ -94,13 +94,23 @@ for my $opt (qw/-w --walk-speed/) {
);
}
-for my $opt (qw/-t --time --depart -a --arrive/) {
+for my $opt (qw/-t --time --depart/) {
$cmd = Test::Command->new(cmd => "$efa $opt 35:12 $testarg");
$cmd->exit_isnt_num(0);
$cmd->stdout_is_eq($EMPTY);
$cmd->stderr_is_eq(
- mk_err('time', '35:12', 'Must match HH:MM')
+ mk_err('depart', '35:12', 'Must match HH:MM')
+ );
+}
+
+for my $opt (qw/-a --arrive/) {
+ $cmd = Test::Command->new(cmd => "$efa $opt 35:12 $testarg");
+
+ $cmd->exit_isnt_num(0);
+ $cmd->stdout_is_eq($EMPTY);
+ $cmd->stderr_is_eq(
+ mk_err('arrive', '35:12', 'Must match HH:MM')
);
}