factor: use new words

[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 c44ef62554227e086c8f199df237cda4138ca5a9..1a426f9a110e003c5550c12ecff9af31b4a5e9ab 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" swap subseq-start [ 9 - ] [ 1 - ] bi ] keep subseq print ;
+    [ "UTC" find-subseq [ 9 - ] [ 1 - ] bi ] keep subseq print ;
 
 MAIN: web-scraping-main