]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/google/search/search.factor
assocs.extras: deep-at -> deep-of
[factor.git] / extra / google / search / search.factor
index 2bf33e6c2e418ac61cf12757a238a19ff0b360a0..7f4b0b4463c0e2d1a9a7989c3ad47e30ab27f40f 100644 (file)
@@ -1,9 +1,9 @@
 ! Copyright (C) 2011 John Benediktsson
 ! See http://factorcode.org/license.txt for BSD license
 
-USING: accessors arrays assocs assocs.extras classes.tuple
-colors.constants combinators formatting fry http.client io
-io.styles json.reader kernel sequences urls wrap.strings ;
+USING: accessors assocs.extras classes.tuple colors combinators
+formatting http.client io io.styles json.reader kernel sequences
+urls wrap.strings ;
 
 IN: google.search
 
@@ -23,7 +23,7 @@ PRIVATE>
 
 : google-search ( query -- results )
     search-url http-get nip json>
-    { "responseData" "results" } deep-at
+    { "responseData" "results" } deep-of
     [ \ search-result from-slots ] map ;
 
 <PRIVATE