Changeset 816 for trunk/UnitTestContrib/test/unit/EmptyTests.pm
- Timestamp:
- 11/19/08 19:11:33 (4 years ago)
- File:
-
- 1 edited
-
trunk/UnitTestContrib/test/unit/EmptyTests.pm (modified) (4 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/UnitTestContrib/test/unit/EmptyTests.pm
r14 r816 5 5 package EmptyTests; 6 6 7 use base qw( TWikiTestCase );7 use base qw( FoswikiTestCase ); 8 8 9 use TWiki;9 use Foswiki; 10 10 use Error qw( :try ); 11 11 … … 17 17 $this->SUPER::set_up(); 18 18 19 # You can now safely modify $ TWiki::cfg19 # You can now safely modify $Foswiki::cfg 20 20 21 21 $topicquery = new Unit::Request( '' ); 22 22 $topicquery->path_info( '/TestCases/WebHome' ); 23 23 try { 24 $this->{twiki} = new TWiki( 'AdminUser' || '' );24 $this->{twiki} = new Foswiki( 'AdminUser' || '' ); 25 25 my $user = $this->{twiki}->{user}; 26 26 … … 37 37 $user, 38 38 "Temporarytwikiweb", 39 " TWiki");39 "System"); 40 40 41 41 # Create a topic like this: … … 44 44 # to make sure you fixture protects things like .htpasswd 45 45 46 } catch TWiki::AccessControlException with {46 } catch Foswiki::AccessControlException with { 47 47 my $e = shift; 48 48 die "???" unless $e;
Note: See TracChangeset
for help on using the changeset viewer.
