use CONSTANT:

db4
Doug Coleman 2009-03-12 23:16:07 -05:00
parent 20c1ea1945
commit db19b48c3b
1 changed files with 1 additions and 1 deletions

View File

@ -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? [