Changeset 775

Timestamp:

1999-11-05T15:34:20+13:00 (25 years ago)

Author:

sjboddie

Message:

urlsafe now converts '/' characters

File:

• trunk/gsdl/perllib/html.pm (modified) (1 diff)

trunk/gsdl/perllib/html.pm

@@ -43 +43 @@
 sub urlsafe
 {
-    $_[0] =~ s/[\x09\x20\x22\x3c\x3e\x5b\x5c\x5d\x5e\x60\x7b\x7c\x7d\x7e\?\=\&\+_]/sprintf("%%%2x", ord($&))/ge;
+    $_[0] =~ s/[\x09\x20\x22\x3c\x3e\x5b\x5c\x5d\x5e\x60\x7b\x7c\x7d\x7e\?\=\&\+_\/]/sprintf("%%%2x", ord($&))/ge;
 }