08/09/29 23:14:06
だめな時だと(KWINS PHS)こんな感じになってしまいます。
(navi2ch-net-ignore-errors (let (... proc status) (while ... ... ... ... ... ... ...) (cond ... ... ... ... ... ...) (if ... proc)))
(catch (quote ret) (navi2ch-net-ignore-errors (let ... ... ... ...)))
navi2ch-net-download-file("URLリンク(gimpo.2ch.net)" "Sun, 28 Sep 2008 06:00:25 GMT" ("200" "304" nil) nil)
(setq redo nil proc (navi2ch-net-download-file url time (list "200" "304" ...) other-header) status (and proc (navi2ch-net-get-status proc)) header (and proc (navi2ch-net-get-header proc)))
(while redo (setq redo nil proc (navi2ch-net-download-file url time ... other-header) status (and proc ...) header (and proc ...)) (cond (... ...) (... ... ... ... ...) (... ... ...) (... ...) (t ...)))
(let ((coding-system-for-write ...) (coding-system-for-read ...) (redo t) proc status header cont) (while redo (setq redo nil proc ... status ... header ...) (cond ... ... ... ... ...)) header)
navi2ch-net-update-file("URLリンク(gimpo.2ch.net)" "/home/zaurus/.navi2ch/gimpo.2ch.net/ramen/subject.txt" "Sun, 28 Sep 2008 06:00:25 GMT" navi2ch-2ch-subject-callback)