[Sandweb-commit] CVS: sandweb/bin sandweb.cgi,1.156,1.157

[Nick J. <nje...@us...>]

Update of /cvsroot/sandweb/sandweb/bin
In directory usw-pr-cvs1:/tmp/cvs-serv21160

Modified Files:
	sandweb.cgi 
Log Message:
* took care of some testing of uninitialized vars

Index: sandweb.cgi
===================================================================
RCS file: /cvsroot/sandweb/sandweb/bin/sandweb.cgi,v
retrieving revision 1.156
retrieving revision 1.157
diff -U2 -r1.156 -r1.157
--- sandweb.cgi	10 Feb 2002 09:46:47 -0000	1.156
+++ sandweb.cgi	11 Feb 2002 00:27:32 -0000	1.157
@@ -64,5 +64,5 @@
 ###############################################################################
 sub main {
-	my $action = CGI::param('action');
+	my $action = CGI::param('action') || '';
 
 	# catch file-specific actions
@@ -82,5 +82,5 @@
 	else {
 		# if auth cookie exists, this will return it's data
-		my $ck_auth = CGI::cookie('sandweb_auth');
+		my $ck_auth = CGI::cookie('sandweb_auth') || '';
 
 		if ($ck_auth) {