[Date Prev][Date Next][Thread Prev][][Date Index][Thread Index]

Re: octet viewer



At Tue, 29 Jan 2002 14:31:14 +0900,
土屋さん wrote:
> 
> よくよく考えてみると,w3m-prepare-content を拡張すれば,octet.el が統
> 合できるのでは? という気がしてきました.
> 
> 以下のように関数を分割してしまい,w3m-prepare-application-content を準
> 備して貰えば良いのではないかと思うのですが,どうでしょう?

すみません、理解が追い付けてませんが、こういうことでしょうか?


;; なぜか selecting deleted buffer でエラーになりますが…。
(defun w3m-prepare-application-content (url type output-buffer
					    &optional content-charset)
  (require 'octet)
  (octet-buffer (file-name-nondirectory url))
  (let ((result-buffer (current-buffer)))
    (with-current-buffer output-buffer
      (let (buffer-read-only)
	(w3m-clear-local-variables)
	(setq w3m-current-title (file-name-nondirectory url)
	      w3m-current-url (w3m-real-url url))
	(widen)
	(delete-region (point-min) (point-max))
	(insert-buffer result-buffer)
	t))))

--
Yuuichi Teranishi (寺西裕一) <teranisi@gohome.org>
PGP 5.0i Public Key: http://www.gohome.org/pgp5/teranisi.key
"Love is needing to be loved..."