GothenburgBitFactory/taskshell
1
0
Fork 0
mirror of https://github.com/GothenburgBitFactory/taskshell.git synced 2025-06-26 10:54:29 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Unit Tests

Browse source 
- Corrected template to recognize all versions.
This commit is contained in:
Paul Beckingham 2014-12-21 13:12:16 -05:00
parent c81c18d261
commit 02e6530bd3
1 changed files with 1 additions and 16 deletions
Download patch file Download diff file Expand all files Collapse all files

17
test/template.t
View file

@ -29,27 +29,12 @@ use strict;
use warnings; use warnings;
use Test::More tests => 2; use Test::More tests => 2;
# Ensure environment has no influence.
#delete $ENV{'TASKDATA'};
#delete $ENV{'TASKRC'};
use File::Basename; use File::Basename;
my $ut = basename ($0); my $ut = basename ($0);
#my $rc = $ut . '.rc';
# Create the rc file.
#if (open my $fh, '>', $rc)
#{
# print $fh "data.location=.\n",
# "confirmation=off\n";
# close $fh;
#}
# Bug <id> - <description> # Bug <id> - <description>
my $output = qx{../src/tasksh --version 2>&1}; my $output = qx{../src/tasksh --version 2>&1};
ok ($? == 0, "$ut: version check"); ok ($? == 0, "$ut: version check");
like ($output, qr/0.9.0.dev/ms, "$ut: tasksh version found"); like ($output, qr/^\d\.\d\.\d(?:\.beta\d)$/ms, "$ut: tasksh version found");
# Cleanup.
#unlink qw(), $rc;
exit 0; exit 0;