← Back to branch summary

~kosova/+junk/tuxfamily-twiki

« back to all changes in this revision

Viewing changes to foswiki/lib/TWiki.pm

  • Committer: James Michael DuPont
  • Date: 2009-07-18 19:58:49 UTC
  • Revision ID: jamesmikedupont@gmail.com-20090718195849-vgbmaht2ys791uo2
added foswiki

Show diffs side-by-side

added added

removed removed

Lines of Context:
foswiki/lib/TWiki.pm
 
1
#package TWiki;
 
2
 
 
3
use Foswiki;
 
4
 
 
5
sub TWiki::new {
 
6
    my ( $this, $loginName, $query, $initialContext ) = @_;
 
7
    if( ! $Foswiki::Plugins::SESSION && UNIVERSAL::isa( $query, 'CGI' ) ) {
 
8
        # Compatibility: User gave a CGI object
 
9
        # This probably means we're inside a script
 
10
        $query = undef;
 
11
    }
 
12
    my $fatwilly = new Foswiki( $loginName, $query, $initialContext );
 
13
    require TWiki::Sandbox;
 
14
    $fatwilly->{sandbox} = new TWiki::Sandbox();
 
15
    return $fatwilly;
 
16
}
 
17
 
 
18
*TWiki::regex = \%Foswiki::regex;
 
19
*TWiki::cfg   = \%Foswiki::cfg;
 
20
*TWiki::isTrue = \&Foswiki::isTrue;
 
21
 
 
22
1;