From: ivan <ivan>
Date: Mon, 12 Apr 1999 21:09:39 +0000 (+0000)
Subject: force username to lowercase
X-Git-Tag: freeside_1_2_1~6
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=6a5ebc353a96181fbef6bf4bbfcc5c205f1ef15d

force username to lowercase
---

diff --git a/site_perl/UID.pm b/site_perl/UID.pm
index b4486c1e8..f7338202e 100644
--- a/site_perl/UID.pm
+++ b/site_perl/UID.pm
@@ -170,7 +170,7 @@ sub cgisetotaker {
   } else {
     die "fatal: Can't get REMOTE_USER!";
   }
-  return $user;
+  lc($user);
 }
 
 =item checkeuid
@@ -241,7 +241,7 @@ coderef into the hash %FS::UID::callback :
 
 =head1 VERSION
 
-$Id: UID.pm,v 1.8 1999-02-23 07:23:23 ivan Exp $
+$Id: UID.pm,v 1.9 1999-04-12 21:09:39 ivan Exp $
 
 =head1 BUGS
 
@@ -287,7 +287,10 @@ inlined suidsetup
 ivan@sisd.com 98-sep-12
 
 $Log: UID.pm,v $
-Revision 1.8  1999-02-23 07:23:23  ivan
+Revision 1.9  1999-04-12 21:09:39  ivan
+force username to lowercase
+
+Revision 1.8  1999/02/23 07:23:23  ivan
 oops, don't comment out &swapuid in &adminsuidsetup!
 
 Revision 1.7  1999/01/18 09:22:40  ivan