Re: w3m-safe-url-regexp

[Katsumi Yamaoka <yamaoka@xxxxxxx>]

>>>>> In [emacs-w3m : No.09967] 山岡 wrote:

> (defun w3m-retrieve (args)
>   ...
>   (unless (and w3m-safe-url-regexp
> 	       (not (string-match w3m-safe-url-regexp url)))
>     ...Retrieving...))

> を次のように変更:

> (defun w3m-retrieve (args)
>   ...
>   (unless (let ((regexp (if (eq w3m-safe-url-regexp-to-use t)
> 			    w3m-safe-url-regexp
> 			  (or w3m-safe-url-regexp-to-use
> 			      w3m-safe-url-regexp))))
> 	    (and regexp
> 		 (not (string-match regexp url))))
>     ...Retrieving...))

これは余計でした。mime-w3m などで最初に記事を表示する場合は
`w3m-safe-url-regexp' は `mime-w3m-safe-url-regexp' などの値に
束縛されています。それに `w3m-retrieve' は temp バッファで呼ばれ
ることが多いので、`w3m-safe-url-regexp-to-use' の記事バッファに
おけるローカルな値を参照することができません。

改善方針の改定版とお試しパッチを、この記事に続けてポストします。
-- 
山岡