From db19b48c3bfc0675f1346a08a4936924a9bbcc49 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Thu, 12 Mar 2009 23:16:07 -0500 Subject: [PATCH] use CONSTANT: --- extra/geo-ip/geo-ip.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/extra/geo-ip/geo-ip.factor b/extra/geo-ip/geo-ip.factor index ad6302ca55..d07ed4b69c 100644 --- a/extra/geo-ip/geo-ip.factor +++ b/extra/geo-ip/geo-ip.factor @@ -9,7 +9,7 @@ IN: geo-ip : db-path ( -- path ) "IpToCountry.csv" temp-file ; -: db-url ( -- url ) "http://software77.net/cgi-bin/ip-country/geo-ip.pl?action=download" ; +CONSTANT: db-url "http://software77.net/cgi-bin/ip-country/geo-ip.pl?action=download" : download-db ( -- path ) db-path dup exists? [