llibra

(ql:quickload :cl-ppcre)
(ql:quickload :bordeaux-threads)
(ql:quickload :usocket)
(ql:quickload :drakma)

(asdf:component-version (asdf:find-system :drakma))
;=> "1.2.7"

(flet ((echo-content ()
         (usocket:with-socket-listener (socket "127.0.0.1" 8080 :reuse-address t

ataka

カレーのレシピ

誰でもできる、美味しいカレーの作り方です。旦那も息子もこのカレーが大好物。
ポイントは玉ねぎと人参はミキサーで細かくしてしまうところ。逆にコクのある美味しいカレーになります。

レシピの作者
山田サチ子さん

材料 （ 8皿分 ）

g000001

(defcommand pa (&optional (after 60)) ((:number "pop up after:"))
  "pop up after n sec"
  (let ((w (current-window)))
    (bt:make-thread 
     (lambda ()
       (sleep after)
       (alarm-foo) ;; alarm (run-shell-command "/usr/bin/mpg123 chick.mp3") etc
       (pull-window w)))))