Changeset 1010 for trunk/gsdl/perllib/webpageutil.pm
- Timestamp:
- 2000-03-03T16:38:09+13:00 (24 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/perllib/webpageutil.pm
r721 r1010 1 1 package webpageutil; 2 2 3 requirehtml;3 use ghtml; 4 4 5 5 sub error_location … … 7 7 my ($args,$text) = @_; 8 8 9 & html::urlsafe($text);9 &ghtml::urlsafe($text); 10 10 my $mess_url = "$args->{'httpbuild'}&bca=mess&head=_headerror_"; 11 11 print "Location: $mess_url&mess=$text\n\n"; … … 16 16 my ($args,$text,$tmpname,$bc1finished) = @_; 17 17 18 & html::urlsafe($text);18 &ghtml::urlsafe($text); 19 19 my $mess_url = "$args->{'httpbuild'}&bca=buildstatus"; 20 20 $mess_url .= "&bc1tmpfilename=$tmpname&bc1finished=$bc1finished";
Note:
See TracChangeset
for help on using the changeset viewer.