diff --git a/opentrafficshaper/plugins/webserver/pages/index.pm b/opentrafficshaper/plugins/webserver/pages/index.pm index 3d26e8a01a5d69916e7174e5b7c1e6780aa52629..fc42c296a1d3e64a388ccad20c8371e6fc9f6fb9 100644 --- a/opentrafficshaper/plugins/webserver/pages/index.pm +++ b/opentrafficshaper/plugins/webserver/pages/index.pm @@ -33,11 +33,12 @@ our (@ISA,@EXPORT,@EXPORT_OK); sub _catchall { - my ($globals,$module,$daction,$request) = @_; + my ($kernel,$globals,$module,$daction,$request) = @_; + + # If we not passed default by the main app, just return return if ($daction ne "default"); - # Build content my $content = ""; diff --git a/opentrafficshaper/plugins/webserver/pages/static.pm b/opentrafficshaper/plugins/webserver/pages/static.pm index 8e546e21dc7f9203f9a4c04fb848de7904df7982..a2fd5a2ba2bbf59609bc5d6aaaef9374d53415db 100644 --- a/opentrafficshaper/plugins/webserver/pages/static.pm +++ b/opentrafficshaper/plugins/webserver/pages/static.pm @@ -43,7 +43,7 @@ our (@ISA,@EXPORT,@EXPORT_OK); sub _catchall { - my ($globals,$module,$daction,$request) = @_; + my ($kernel,$globals,$module,$daction,$request) = @_; my $logger = $globals->{'logger'}; @@ -113,7 +113,7 @@ sub _catchall # Set to binary mode binmode(FH); # Suck in file - my $buffer; + my $buffer = ""; my $len; do { $len = read(FH,$buffer,4096,length($buffer));