From ac68e73fbbb596dfedd9eb4166952556bdbac16b Mon Sep 17 00:00:00 2001
From: Stefano Zacchiroli <zack@upsilon.cc>
Date: Thu, 26 Dec 2002 15:50:47 +0000
Subject: [PATCH] - bugfix: removed trailing "/" from 'my_own_url'

---
 helm/http_getter/http_getter_env.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/helm/http_getter/http_getter_env.ml b/helm/http_getter/http_getter_env.ml
index 377d305f4..acbc17853 100644
--- a/helm/http_getter/http_getter_env.ml
+++ b/helm/http_getter/http_getter_env.ml
@@ -100,7 +100,7 @@ let host =
   Pcre.replace ~pat:"\n+$" (Buffer.contents buf)
 let my_own_url =
   sprintf
-    "http://%s%s/"
+    "http://%s%s" (* without trailing '/' *)
     host
     (if port = 80 then "" else (sprintf ":%d" port))
 let dtd_base_url = safe_getenv "HTTP_GETTER_DTD_BASE_URL"
-- 
2.39.2