Migrated rest of the webserver pages to new args

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 = "";
 

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));