Changeset 30553

Show
Ignore:
Timestamp:
02/26/09 22:51:44 (4 years ago)
Author:
miyamuko
Message:

lang/xyzzy/pci-code: should not hardcode user name for test.

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • lang/xyzzy/pci-code/site-lisp/chapter2/hateburec.l

    r30551 r30553  
    117117            user-posts))) 
    118118 
    119 ;(setf tag "xyzzy") 
    120 ;(setf hatebu-users (fill-items (get-user-list tag :count 10))) 
    121 ;(top-matches hatebu-users "youz") 
    122 ;(get-recommendations hatebu-users "youz") 
     119; (setf tag "xyzzy") 
     120; (setf hatebu-users (fill-items (get-user-list tag :count 3))) 
     121; (setf user (car (elt hatebu-users (random (length hatebu-users))))) 
     122; (top-matches hatebu-users user) 
     123; (get-recommendations hatebu-users user)