- 167 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/11/30(金) 16:13:35 ID:uVEELOnE0]
- 間違えた。
thread-open-browser じゃURL開けないてば。
(defun open-browser-all ()
(interactive)
(save-excursion
(save-restriction
(selection-start-end (start end)
(narrow-to-region start end)
(goto-char (point-min))
(while (scan-buffer "h?ttps?://[-_.!~*'()a-zA-Z0-9;/?:@&=+$,%#]+" :regexp t :tail t)
(save-excursion (backward-char)
(2ch::thread-jump)))))))
