#!/usr/local/bin/perl -w =head1 NAME 00ui.t - testing of VCP::UI =cut use strict ; use Carp ; use Test ; use VCP::UI; my $ui; my @tests = ( sub { $ui = VCP::UI->new; ok 1; }, sub { ok ! defined eval { VCP::UI->new( UI => "NOT::A::REAL::MODULE" )->run }; }, ) ; plan tests => scalar( @tests ) ; $_->() for @tests ;
# | Change | User | Description | Committed | |
---|---|---|---|---|---|
#7 | 4021 | Barrie Slaymaker |
- Remove all phashes and all base & fields pragmas - Work around SWASHGET error |
||
#6 | 3974 | Barrie Slaymaker | - IPC::Run no longer required | ||
#5 | 3488 | John Fetkovich | move init of each plugin after writing config file | ||
#4 | 3484 | John Fetkovich | fix a prompt name | ||
#3 | 3440 | John Fetkovich | added more simple tests | ||
#2 | 3261 | John Fetkovich | test suite fixes | ||
#1 | 3237 | Barrie Slaymaker | More work on the UI StateML conventions |