Chris/webperl
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fixed tyop in Application.

Browse Source
This commit is contained in:
Chris 2012-03-26 17:57:28 +01:00
parent de075b8726
commit a97ae64bb8
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Application.pm
View File

@ -186,10 +186,10 @@ sub run {
# Obtain an instance of the page module
my $pageobj = $self -> {"modules"} -> new_module($pageblock)
or die_log($self -> {"cgi"} -> remote_host(), "Application: Unable to load page module $pageblock: ".$self -> {"modules"} -> {"errstr");
or die_log($self -> {"cgi"} -> remote_host(), "Application: Unable to load page module $pageblock: ".$self -> {"modules"} -> {"errstr"});
# And call the page generation function of the page module
my $content = $pageobj -> page_display();
my $content = $pageobj -> page_display();
print $self -> {"cgi"} -> header(-charset => 'utf-8',
-cookie => $self -> {"session"} -> session_cookies());