steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

google.search: these moved to classes.tuple.

db4
John Benediktsson 2013-01-04 09:12:41 -08:00
parent 10a2288ed4
commit 4e518d642d
1 changed files with 0 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
extra/google/search/search.factor
View File

@ -16,12 +16,6 @@ IN: google.search
"8" "rsz" set-query-param "8" "rsz" set-query-param
"0" "start" set-query-param ; "0" "start" set-query-param ;
: set-slots ( assoc obj -- )
'[ swap _ set-slot-named ] assoc-each ;
: from-slots ( assoc class -- obj )
new [ set-slots ] keep ;
TUPLE: search-result cacheUrl GsearchResultClass visibleUrl TUPLE: search-result cacheUrl GsearchResultClass visibleUrl
title content unescapedUrl url titleNoFormatting fileFormat ; title content unescapedUrl url titleNoFormatting fileFormat ;