w3m-view-this-url

[Hiroshi Fujishima <pooh@xxxxxxxxxxxxxxxxxxxx>]

このバグリポートは emacs-w3m 開発チームに送られます。
あなたのローカルサイトの管理者宛てではありません!!

できるだけ簡潔に述べて下さい:
	- 何が起きましたか?
	- 本当はどうなるべきだったと思いますか?
	- そのとき何をしましたか? (正確に)

もし Lisp のバックトレースがあれば添付して下さい。
================================================================
Dear Bug Team!

http://openlab.ring.gr.jp/skk/registdic.cgi/ の

	( )その他の固有名詞
	↑
ここで、RET を押すと添付したエラーになります。
よろしくおねがいします。

================================================================

System Info to help track down your bug:
---------------------------------------
emacs-w3m-version
 => "1.3.236"
emacs-version
 => "GNU Emacs 21.3.50.1 (sparc-sun-solaris2.8, X toolkit, Xaw3d scroll bars)\n of 2003-10-04 on newton.nature.tsukuba.ac.jp"
mule-version
 => "5.0 (SAKAKI)"
system-type
 => usg-unix-v
w3m-version
 => "w3m/0.4.2"
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)
  string-match("fid=\\([^/]+\\)/type=\\([^/]+\\)/name=\\([^/]+\\)/id=\\(.*\\)$" nil)
  (if (string-match "fid=\\([^/]+\\)/type=\\([^/]+\\)/name=\\([^/]+\\)/id=\\(.*\\)$" fid) (progn (list ... ... ... ...)))
  (when (string-match "fid=\\([^/]+\\)/type=\\([^/]+\\)/name=\\([^/]+\\)/id=\\(.*\\)$" fid) (list (match-string 1 fid) (match-string 2 fid) (match-string 3 fid) (match-string 4 fid)))
  w3m-form-field-parse(nil)
  (setq cur-fid (w3m-form-field-parse (get-text-property ... ...)))
  (while (w3m-form-goto-next-field) (setq cur-fid (w3m-form-field-parse ...)) (when (and ... ... ...) (w3m-form-put form ... ... nil) (w3m-form-replace " ")))
  (let ((fid ...) cur-fid) (goto-char 1) (while (w3m-form-goto-next-field) (setq cur-fid ...) (when ... ... ...)))
  (save-excursion (let (... cur-fid) (goto-char 1) (while ... ... ...)))
  w3m-form-input-radio([w3m-form-object post "http://openlab.ring.gr.jp/skk/registdic.cgi/!CURRENT_URL!"; nil application/x-www-form-urlencoded (1 (:value ...) 2 (:value ...) 3 (:value ...) 4 (:value ...) 5 (:value ...) 6 (:value ...) 7 (:value ...) 8 (:value ...) 9 (:value ...) 10 (:value ...))] 7 "hinsi" "propernoun")
  eval((w3m-form-input-radio [w3m-form-object post "http://openlab.ring.gr.jp/skk/registdic.cgi/!CURRENT_URL!"; nil application/x-www-form-urlencoded (1 ... 2 ... 3 ... 4 ... 5 ... 6 ... 7 ... 8 ... 9 ... 10 ...)] 7 "hinsi" "propernoun"))
  (cond ((setq act ...) (eval act)) ((setq url ...) (w3m-view-this-url-1 url arg new-session)) ((w3m-url-valid ...) (if ... ... ...)) ((setq url ...) (unless ... ...)) (t (w3m-display-message "No URL at point")))
  (let (act url) (cond (... ...) (... ...) (... ...) (... ...) (t ...)))
  w3m-view-this-url(nil nil)
  call-interactively(w3m-view-this-url)