initial commit of file from CVS for e-smith-test on Wed 12 Jul 09:10:30 BST 2023
This commit is contained in:
20
root/etc/e-smith/tests/00e-smith-test/00sanity.t
Normal file
20
root/etc/e-smith/tests/00e-smith-test/00sanity.t
Normal file
@@ -0,0 +1,20 @@
|
||||
#!/usr/bin/perl -w
|
||||
|
||||
#----------------------------------------------------------------------
|
||||
# Copyright 1999-2003 Mitel Networks Corporation
|
||||
# This program is free software; you can redistribute it and/or
|
||||
# modify it under the same terms as Perl itself.
|
||||
#----------------------------------------------------------------------
|
||||
|
||||
use strict;
|
||||
use Test::More tests => 8;
|
||||
|
||||
require_ok("Test::Harness");
|
||||
require_ok("Test::More");
|
||||
require_ok("Test::Inline");
|
||||
require_ok("WWW::Automate");
|
||||
require_ok("Test::Simple");
|
||||
require_ok("esmith::TestUtils");
|
||||
|
||||
ok(-e "/etc/e-smith/tests", "Test directory exists");
|
||||
ok(-d "/etc/e-smith/tests", "Test directory is a directory");
|
Reference in New Issue
Block a user