[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
- From: Hiroshi Fujishima <pooh@xxxxxxxxxxxxxxxxxxxx>
- Date: Tue, 08 Jul 2003 21:53:51 +0900 (JST)
- X-ml-name: emacs-w3m
- X-mail-count: 05386
Dear Bug Team!
http://mytown.asahi.com/ を emacs-w3m で表示させようとすると
error in process sentinel: apply: Wrong type argument: stringp, nil
error in process sentinel: Wrong type argument: stringp, nil
となって表示できません。バックトレースを添付します。
よろしくおねがいします。
================================================================
System Info to help track down your bug:
---------------------------------------
emacs-w3m-version
=> "1.3.167"
emacs-version
=> "GNU Emacs 21.3.1 (sparc-sun-solaris2.8, X toolkit, Xaw3d scroll bars)\n of 2003-03-22 on newton.nature.tsukuba.ac.jp"
mule-version
=> "5.0 (SAKAKI)"
system-type
=> usg-unix-v
w3m-version
=> "w3m/0.4.1+cvs-1.845"
w3m-type
=> w3m
w3m-compile-options
=> ("lang=ja" "kanji-symbols" "image" "color" "ansi-color" "mouse" "menu" "cookie" "ssl" "ssl-verify" "external-uri-loader" "w3mmailer" "nntp" "alarm" "mark" "migemo")
w3m-language
=> "Japanese"
w3m-command-arguments
=> nil
w3m-command-arguments-alist
=> nil
w3m-command-environment
=> nil
w3m-use-mule-ucs
=> nil
Debugger entered--Lisp error: (wrong-type-argument stringp nil)
call-process-region(1 8932 nil "/home/pooh/tmp/emacs6_aiqk" (t nil) nil)
apply(call-process-region 1 8932 nil "/home/pooh/tmp/emacs6_aiqk" (t nil) nil nil)
(zerop (apply (quote call-process-region) (point-min) (point-max) (w3m-which-command ...) t (quote ...) nil (cadr x)))
(let ((process-environment ...) (temporary-file-directory ...) (default-directory ...)) (dolist (pair w3m-command-environment) (setenv ... ...)) (zerop (apply ... ... ... ... t ... nil ...)))
(w3m-process-with-environment w3m-command-environment (zerop (apply ... ... ... ... t ... nil ...)))
(let ((coding-system-for-write ...) (coding-system-for-read ...) (default-process-coding-system ...)) (w3m-process-with-environment w3m-command-environment (zerop ...)))
(or (not (and x ...)) (let (... ... ...) (w3m-process-with-environment w3m-command-environment ...)))
(let ((x ...)) (or (not ...) (let ... ...)))
w3m-decode-encoded-contents("deflate")
(or (symbol-value G74699) w3m-current-redirect (w3m-decode-encoded-contents (nth 3 attributes)))
(if (or (symbol-value G74699) w3m-current-redirect (w3m-decode-encoded-contents ...)) (car attributes) (ding) (w3m-message "Can't decode encoded contents: %s" (symbol-value G74701)) nil)
(if attributes (if (or ... w3m-current-redirect ...) (car attributes) (ding) (w3m-message "Can't decode encoded contents: %s" ...) nil))
(lambda (G74696 G74697 G74698 G74699 G74700 G74701 attributes handler) (if (and ... ...) (delete-file ...)) (if attributes (if ... ... ... ... nil)))(--G74686-- --G74687-- --temp-file-- --no-decode-- --orig-url-- --url-- ("text/html" nil nil "deflate" nil "http://mytown.asahi.com/"; "http://mytown.asahi.com/";) (lambda (&rest --cl-rest--) (apply (quote ...) (quote --quit--) (quote --return--) (quote --sync--) (quote --redirect-handler--) (quote --orig-handler--) (quote --referer--) (quote --post-data--) (quote --no-cache--) (quote --no-decode--) (quote --url--) (quote --orig-url--) (quote --i--) --cl-rest--)))
apply((lambda (G74696 G74697 G74698 G74699 G74700 G74701 attributes handler) (if (and ... ...) (delete-file ...)) (if attributes (if ... ... ... ... nil))) --G74686-- --G74687-- --temp-file-- --no-decode-- --orig-url-- --url-- (("text/html" nil nil "deflate" nil "http://mytown.asahi.com/"; "http://mytown.asahi.com/";) (lambda (&rest --cl-rest--) (apply ... ... ... ... ... ... ... ... ... ... ... ... ... --cl-rest--))))
(lambda (&rest --cl-rest--) (apply (quote ...) (quote --G74686--) (quote --G74687--) (quote --temp-file--) (quote --no-decode--) (quote --orig-url--) (quote --url--) --cl-rest--))(("text/html" nil nil "deflate" nil "http://mytown.asahi.com/"; "http://mytown.asahi.com/";) (lambda (&rest --cl-rest--) (apply (quote ...) (quote --quit--) (quote --return--) (quote --sync--) (quote --redirect-handler--) (quote --orig-handler--) (quote --referer--) (quote --post-data--) (quote --no-cache--) (quote --no-decode--) (quote --url--) (quote --orig-url--) (quote --i--) --cl-rest--)))
funcall((lambda (&rest --cl-rest--) (apply (quote ...) (quote --G74686--) (quote --G74687--) (quote --temp-file--) (quote --no-decode--) (quote --orig-url--) (quote --url--) --cl-rest--)) ("text/html" nil nil "deflate" nil "http://mytown.asahi.com/"; "http://mytown.asahi.com/";) (lambda (&rest --cl-rest--) (apply (quote ...) (quote --quit--) (quote --return--) (quote --sync--) (quote --redirect-handler--) (quote --orig-handler--) (quote --referer--) (quote --post-data--) (quote --no-cache--) (quote --no-decode--) (quote --url--) (quote --orig-url--) (quote --i--) --cl-rest--)))
(setq attributes (funcall (symbol-value G74690) attributes handler))
(w3m-process-p (setq attributes (funcall ... attributes handler)))
(if (w3m-process-p (setq attributes ...)) nil (funcall (or handler ...) attributes))
(lambda (G74690 G74691 G74692 G74693 G74694 G74695 attributes handler) (if (w3m-process-p ...) nil (funcall ... attributes)))(--G74686-- --G74687-- --temp-file-- --no-decode-- --orig-url-- --url-- ("text/html" nil nil "deflate" nil "http://mytown.asahi.com/"; "http://mytown.asahi.com/";) (lambda (&rest --cl-rest--) (apply (quote ...) (quote --quit--) (quote --return--) (quote --sync--) (quote --redirect-handler--) (quote --orig-handler--) (quote --referer--) (quote --post-data--) (quote --no-cache--) (quote --no-decode--) (quote --url--) (quote --orig-url--) (quote --i--) --cl-rest--)))
apply((lambda (G74690 G74691 G74692 G74693 G74694 G74695 attributes handler) (if (w3m-process-p ...) nil (funcall ... attributes))) --G74686-- --G74687-- --temp-file-- --no-decode-- --orig-url-- --url-- (("text/html" nil nil "deflate" nil "http://mytown.asahi.com/"; "http://mytown.asahi.com/";) (lambda (&rest --cl-rest--) (apply ... ... ... ... ... ... ... ... ... ... ... ... ... --cl-rest--))))
(lambda (&rest --cl-rest--) (apply (quote ...) (quote --G74686--) (quote --G74687--) (quote --temp-file--) (quote --no-decode--) (quote --orig-url--) (quote --url--) --cl-rest--))(("text/html" nil nil "deflate" nil "http://mytown.asahi.com/"; "http://mytown.asahi.com/";) (lambda (&rest --cl-rest--) (apply (quote ...) (quote --quit--) (quote --return--) (quote --sync--) (quote --redirect-handler--) (quote --orig-handler--) (quote --referer--) (quote --post-data--) (quote --no-cache--) (quote --no-decode--) (quote --url--) (quote --orig-url--) (quote --i--) --cl-rest--)))
(lambda (attributes) ((lambda ... ...) attributes (lambda ... ...)))(("text/html" nil nil "deflate" nil "http://mytown.asahi.com/"; "http://mytown.asahi.com/";))
funcall((lambda (attributes) ((lambda ... ...) attributes (lambda ... ...))) ("text/html" nil nil "deflate" nil "http://mytown.asahi.com/"; "http://mytown.asahi.com/";))
(if (w3m-process-p (setq result ...)) nil (funcall (or handler ...) result))
(lambda (G74727 G74728 G74729 G74730 result handler) (if (w3m-process-p ...) nil (funcall ... result)))(--G74723-- --G74724-- --orig-url-- --url-- t (lambda (attributes) ((lambda ... ...) attributes (lambda ... ...))))
apply((lambda (G74727 G74728 G74729 G74730 result handler) (if (w3m-process-p ...) nil (funcall ... result))) --G74723-- --G74724-- --orig-url-- --url-- (t (lambda (attributes) (... attributes ...))))
(lambda (&rest --cl-rest--) (apply (quote ...) (quote --G74723--) (quote --G74724--) (quote --orig-url--) (quote --url--) --cl-rest--))(t (lambda (attributes) ((lambda ... ...) attributes (lambda ... ...))))
(lambda (result) ((lambda ... ...) result (lambda ... ...)))(t)
funcall((lambda (result) ((lambda ... ...) result (lambda ... ...))) t)
(if (w3m-process-p (setq exit-status ...)) nil (funcall (or handler ...) exit-status))
(lambda (G74752 G74753 exit-status handler) (if (w3m-process-p ...) nil (funcall ... exit-status)))(--G74748-- --G74749-- 0 (lambda (result) ((lambda ... ...) result (lambda ... ...))))
apply((lambda (G74752 G74753 exit-status handler) (if (w3m-process-p ...) nil (funcall ... exit-status))) --G74748-- --G74749-- (0 (lambda (result) (... result ...))))
(lambda (&rest --cl-rest--) (apply (quote ...) (quote --G74748--) (quote --G74749--) --cl-rest--))(0 (lambda (result) ((lambda ... ...) result (lambda ... ...))))
(lambda (exit-status) ((lambda ... ...) exit-status (lambda ... ...)))(0)
funcall((lambda (exit-status) ((lambda ... ...) exit-status (lambda ... ...))) 0)
(let ((w3m-process-exit-status) (w3m-current-buffer ...)) (when realm (w3m-process-set-authinfo w3m-current-url realm user passwd)) (funcall (w3m-process-handler-function x) exit-status))
(progn (set-buffer (w3m-process-handler-buffer x)) (let (... ...) (when realm ...) (funcall ... exit-status)))
(if (buffer-name (w3m-process-handler-buffer x)) (progn (set-buffer ...) (let ... ... ...)))
(when (buffer-name (w3m-process-handler-buffer x)) (set-buffer (w3m-process-handler-buffer x)) (let (... ...) (when realm ...) (funcall ... exit-status)))
(while --dolist-temp--74770 (setq x (car --dolist-temp--74770)) (when (buffer-name ...) (set-buffer ...) (let ... ... ...)) (setq --dolist-temp--74770 (cdr --dolist-temp--74770)))
(let ((--dolist-temp--74770 ...) x) (while --dolist-temp--74770 (setq x ...) (when ... ... ...) (setq --dolist-temp--74770 ...)) nil)
(catch (quote --cl-block-nil--) (let (... x) (while --dolist-temp--74770 ... ... ...) nil))
(cl-block-wrapper (catch (quote --cl-block-nil--) (let ... ... nil)))
(block nil (let (... x) (while --dolist-temp--74770 ... ... ...) nil))
(dolist (x (w3m-process-handlers obj)) (when (buffer-name ...) (set-buffer ...) (let ... ... ...)))
(let ((exit-status ...) (buffer ...) (realm w3m-process-realm) (user w3m-process-user) (passwd w3m-process-passwd) (obj w3m-process-object)) (setq w3m-process-object nil) (dolist (x ...) (when ... ... ...)) (dolist (x ...) (when ... ... ...)))
(save-current-buffer (set-buffer (process-buffer process)) (setq w3m-process-queue (delq w3m-process-object w3m-process-queue)) (let (... ... ... ... ... ...) (setq w3m-process-object nil) (dolist ... ...) (dolist ... ...)))
(if (buffer-name (process-buffer process)) (save-current-buffer (set-buffer ...) (setq w3m-process-queue ...) (let ... ... ... ...)) (catch (quote last) (dolist ... ...)))
(unwind-protect (if (buffer-name ...) (save-current-buffer ... ... ...) (catch ... ...)) (delete-process process) (w3m-process-start-queued-processes))
(let ((inhibit-quit w3m-process-inhibit-quit)) (unwind-protect (if ... ... ...) (delete-process process) (w3m-process-start-queued-processes)))
w3m-process-sentinel(#<process /usr/local/emacs21/bin/w3m> "finished\n")