Changeset 13840 for branches/Release01x01/TWikiCompatibilityPlugin/test/unit/TWikiCompatibilityPlugin/TWikiFuncTests.pm
- Timestamp:
- 01/27/12 06:04:52 (4 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/Release01x01/TWikiCompatibilityPlugin/test/unit/TWikiCompatibilityPlugin/TWikiFuncTests.pm
r13839 r13840 97 97 $this->assert_matches( qr!/$ss/$this->{test_web}/WebHome!, $result ); 98 98 99 $this->finishFoswikiSession();100 99 $TWiki::Plugins::SESSION = 101 TWiki->new( undef,100 $this->createNewFoswikiSession( undef, 102 101 Unit::Request->new( { topic => "Sausages.AndMash" } ) ); 103 102 $this->{session} = $TWiki::Plugins::SESSION; … … 126 125 my $q = Unit::Request->new( {} ); 127 126 $q->path_info('/Sausages/AndMash'); 128 $this->finishFoswikiSession(); 129 $TWiki::Plugins::SESSION = TWiki->new( undef, $q ); 127 $TWiki::Plugins::SESSION = $this->createNewFoswikiSession( undef, $q ); 130 128 $this->{session} = $TWiki::Plugins::SESSION; 131 129 … … 548 546 END 549 547 ); 550 $this->finishFoswikiSession(); 551 $this->{session} = TWiki->new(); 548 $this->{session} = $this->createNewFoswikiSession(); 552 549 $TWiki::Plugins::SESSION = $this->{session}; 553 550 my $access = … … 627 624 END 628 625 ); 629 $this->finishFoswikiSession(); 630 $this->{session} = TWiki->new(); 626 $this->{session} = $this->createNewFoswikiSession(); 631 627 $TWiki::Plugins::SESSION = $this->{session}; 632 628 my $access = … … 891 887 my $this = shift; 892 888 $this->assert( TWiki::Func::isGuest(), $this->{session}->{user} ); 893 $this-> finishFoswikiSession();894 $this->{session} = TWiki->new( $TWiki::cfg{AdminUserLogin} );889 $this->{session} = 890 $this->createNewFoswikiSession( $TWiki::cfg{AdminUserLogin} ); 895 891 $TWiki::Plugins::SESSION = $this->{session}; 896 892 $this->assert( !TWiki::Func::isGuest(), $this->{session}->{user} ); … … 914 910 * Set FINALPREFERENCES = PSIBG 915 911 HERE 916 $this-> finishFoswikiSession();917 $this->{session} = TWiki->new( $TWiki::cfg{GuestUserLogin}, $q );912 $this->{session} = 913 $this->createNewFoswikiSession( $TWiki::cfg{GuestUserLogin}, $q ); 918 914 $TWiki::Plugins::SESSION = $this->{session}; 919 915 $this->assert_str_equals( "naff", … … 927 923 * Set PSIBG = naff 928 924 HERE 929 $this-> finishFoswikiSession();930 $this->{session} = TWiki->new( $TWiki::cfg{GuestUserLogin}, $q );925 $this->{session} = 926 $this->createNewFoswikiSession( $TWiki::cfg{GuestUserLogin}, $q ); 931 927 $TWiki::Plugins::SESSION = $this->{session}; 932 928 $this->assert_str_equals( "naff",
Note: See TracChangeset
for help on using the changeset viewer.
