Revert "sequences: swap stack arguments for start/start*/subseq?."

[factor.git] / extra / rosetta-code / web-scraping / web-scraping.factor

diff --git a/extra/rosetta-code/web-scraping/web-scraping.factor b/extra/rosetta-code/web-scraping/web-scraping.factor
index d0a56184cb2a94610a9100f1270f467ae1ab1d80..402a960124e28422ceadd9f03249ac68bb4ac10d 100644 (file)
--- a/extra/rosetta-code/web-scraping/web-scraping.factor
+++ b/extra/rosetta-code/web-scraping/web-scraping.factor
@@ -16,6 +16,6 @@ IN: rosetta-code.web-scraping
 
 : web-scraping-main ( -- )
     "http://tycho.usno.navy.mil/cgi-bin/timer.pl" http-get nip
-    [ "UTC" start [ 9 - ] [ 1 - ] bi ] keep subseq print ;
+    [ "UTC" swap start [ 9 - ] [ 1 - ] bi ] keep subseq print ;
 
 MAIN: web-scraping-main