From df964ba058f8727b1818aa90e522a3b201338ab5 Mon Sep 17 00:00:00 2001 From: ivan Date: Mon, 9 Nov 1998 08:36:05 +0000 Subject: [PATCH] haha --- site_perl/CGI.pm | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/site_perl/CGI.pm b/site_perl/CGI.pm index 8970b301c..611103bc9 100644 --- a/site_perl/CGI.pm +++ b/site_perl/CGI.pm @@ -127,7 +127,7 @@ Returns current URL with LEVEL levels of path removed from the end (default 0). =cut -=item url { +sub url { my($up)=@_; my($cgi)=FS::UID::cgi; my($url)=new URI::URL $cgi; @@ -161,7 +161,10 @@ lose the background, eidiot ivan@sisd.com 98-sep-2 pod ivan@sisd.com 98-sep-12 $Log: CGI.pm,v $ -Revision 1.7 1998-11-09 06:10:59 ivan +Revision 1.8 1998-11-09 08:36:05 ivan +haha + +Revision 1.7 1998/11/09 06:10:59 ivan added sub url Revision 1.6 1998/11/09 05:44:20 ivan -- 2.11.0