From e6253449d2bfbd8903d5adf366a4991f8648ca67 Mon Sep 17 00:00:00 2001
From: Eli Barzilay <eli@racket-lang.org>
Date: Thu, 26 Jan 2006 08:15:53 +0000
Subject: [PATCH] add current version number to the version url

svn: r1978
---
 collects/version/check.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/version/check.ss b/collects/version/check.ss
index 31f1b4ba34..6e0d6b648d 100644
--- a/collects/version/check.ss
+++ b/collects/version/check.ss
@@ -49,7 +49,7 @@
       ;; Get server information, carefully
       (define version-info
         (parameterize ([current-input-port
-                        (try (url->port version-url)
+                        (try (url->port (format "~a?~a" version-url (version)))
                              "could not connect to website")])
           (try (read) "unexpected response from server")))
       (define (get key)