diff options
| author | ivan <ivan> | 1998-11-09 08:36:05 +0000 |
|---|---|---|
| committer | ivan <ivan> | 1998-11-09 08:36:05 +0000 |
| commit | df964ba058f8727b1818aa90e522a3b201338ab5 (patch) | |
| tree | d5a9895969467dfd78c026f0697218c26a6aa932 | |
| parent | 7dc264ba036fe5398a2fa1b643bae3187e92cf39 (diff) | |
haha
| -rw-r--r-- | site_perl/CGI.pm | 7 |
1 files 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 |