eurekafag 30.01.2011 13:25 148640270612963639998498

Every day I'm who the fuck?

(defun хуита ()
(interactive)
(let ((parts (cdr (assoc jabber-group jabber-muc-participants))))
(funcall jabber-send-function jabber-buffer-connection (concat "Every day I'm " (car (nth (random (length parts)) parts))))))

elisp, emacs
#htthh
re 3 comments !recommend ~bookmark Ssubscribe
1. werehuman 30.01.2011 13:27 lithium

лисп же ленью не обладает? Чувствую, при большом parts тормозить будет неслабо

#htthh/1
rereply
2. werehuman → werehuman /1 30.01.2011 13:27 lithium

а, не, туплю. Мне показалось, что ты весь список рандомизируешь

#htthh/2
rereply
3. eurekafag → werehuman /1 30.01.2011 13:27 148640270612963639998498

Всё он обладает.

#htthh/3
rereply
Do you really want to delete ?