From 7a056d997ca002a99fec6d303b7077294c1d999b Mon Sep 17 00:00:00 2001
From: Siri Hansen <siri@erlang.org>
Date: Fri, 25 Jan 2013 11:33:57 +0100
Subject: [test_server] Don't escape : and @ in test log links

If escaping :, then links of type "file:///c:/ldisk..." will not work.

Escaping @ does not create any problems, but the link becomes harder
to read and most modern browsers can handle this.
---
 lib/test_server/src/test_server_ctrl.erl | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 'lib/test_server/src')

diff --git a/lib/test_server/src/test_server_ctrl.erl b/lib/test_server/src/test_server_ctrl.erl
index b7e7926fd6..e5d75e43c9 100644
--- a/lib/test_server/src/test_server_ctrl.erl
+++ b/lib/test_server/src/test_server_ctrl.erl
@@ -5364,11 +5364,12 @@ do_uri_encode([Char|Chars]) ->
 do_uri_encode([]) ->
     [].
 
-%% Copied from http_uri.erl
+%% Copied from http_uri.erl, but slightly modified
+%% (not converting @ and :)
 reserved() ->
-    sets:from_list([$;, $:, $@, $&, $=, $+, $,, $/, $?,
+    sets:from_list([$;, $&, $=, $+, $,, $/, $?,
 		    $#, $[, $], $<, $>, $\", ${, $}, $|,
-			       $\\, $', $^, $%, $ ]).
+                    $\\, $', $^, $%, $ ]).
 
 encoding(File) ->
     case epp:read_encoding(File) of
-- 
cgit v1.2.3