>>414 のつづき

(defun navi2ch-article-link-ml-put-link-property ()
"ML のタグにリンク属性を付加するって関数です"
(save-excursion
(point-min)
(while (re-search-forward
"\\[\\([A-Za-z0-9_-]+\\)[ :]+\\([0-9]+\\)\\]" nil t)
(let ((url (navi2ch-article-link-ml-get-url (match-string 1)
(string-to-number (match-string 2)))))
(and url (navi2ch-article-set-link-property-subr
(match-beginning 0) (match-end 0) 'url url))))))

という部分があるのですが、該当する正規表現の部分を [A-Za-z0-9_.-] と
いう形にしてピリオドにもひっかけようと思ったのですが、

Signaling: (args-out-of-range #<buffer "*navi2ch article http://pc.2ch.net/linux/dat/1036429182.dat"> 13 14)
signal(args-out-of-range (#<buffer "*navi2ch article http://pc.2ch.net/linux/dat/1036429182.dat"> 13 14))
byte-code("..." [window-configuration err set-window-configuration signal] 3)
navi2ch-bm-select-article(nil)
call-interactively(navi2ch-bm-select-article)

と、停止してしまいます。正規表現にピリオドを含めた事がおかしいのだと
思うのですが、[] 内にある場合は問題ないですよね？
それとも、ピリオドを含めた事で、予想外の範囲までひろってるという事でしょうか？