[NoCat] Patch: anonymous-01.patch

[Karl Gaissmaier]

--------------Boundary-00=_VL3R4X2FUB0RR4PSSL05
Content-Type: text/plain;
  charset="us-ascii"
Content-Transfer-Encoding: quoted-printable

Hi folks,

thanks Vlad, that we've the chance for a CVS Server.
Here are the first patches for public review:

Name:
=09anonymous-01.patch

Affected Files:
=09cgi-bin/admlogin
=09cgi-bin/login

Severity:
=09low

Description:
=09Uses the ANONYMOUS constant vom NoCat.pm instead of "UNNOWN"
=09in the affecetd files. I think this was just a lapse during the change=
s over
=09time.

--=20
Karl Gaissmaier       KIZ/Infrastructure, University of Ulm, Germany
Email:karl.gaissmaier@kiz.uni-ulm.de           Service Group Network
--------------Boundary-00=_VL3R4X2FUB0RR4PSSL05
Content-Type: text/x-diff;
  charset="us-ascii";
  name="anonymous-01.patch"
Content-Transfer-Encoding: 7bit
Content-Disposition: attachment; filename="anonymous-01.patch"

diff -Naur NoCatAuth-nightly/cgi-bin/admlogin NoCatAuth-mod/cgi-bin/admlogin
--- NoCatAuth-nightly/cgi-bin/admlogin	Wed Mar  6 11:01:17 2002
+++ NoCatAuth-mod/cgi-bin/admlogin	Wed Jul 16 17:33:57 2003
@@ -13,7 +13,7 @@
 ###
 
 use lib '../lib/';
-use NoCat;
+use NoCat qw( ANONYMOUS );
 use strict;
 
 my $authserv	= NoCat->auth_service( ConfigFile => $ENV{NOCAT} );
@@ -27,7 +27,7 @@
 ));
 
 $authserv->log( 7, sprintf( "User %s from %s requests %s", 
-    $params->{user} || "UNKNOWN", $cgi->remote_host, lc( $params->{mode} ) || "form" ) );
+    $params->{user} || ANONYMOUS, $cgi->remote_host, lc( $params->{mode} ) || "form" ) );
 
 # Figure out which image button was clicked (since they don't have value="" attributes).
 if (my ($button) = grep $params->{"mode_$_.x"}, qw( login skip logout )) {
diff -Naur NoCatAuth-nightly/cgi-bin/login NoCatAuth-mod/cgi-bin/login
--- NoCatAuth-nightly/cgi-bin/login	Thu Aug 15 04:05:18 2002
+++ NoCatAuth-mod/cgi-bin/login	Wed Jul 16 17:29:40 2003
@@ -33,7 +33,7 @@
 ));
 
 $authserv->log( 7, sprintf( "User %s from %s requests %s", 
-    $params->{user} || "UNKNOWN", $cgi->remote_host, 
+    $params->{user} || ANONYMOUS, $cgi->remote_host, 
     lc( $params->{mode} ) || "form" ) 
 );
 

--------------Boundary-00=_VL3R4X2FUB0RR4PSSL05--