[xyzzy:00540] Re: gzipファイルを読み込ん

["Seiya Suda" <EZU11330@xxxxxxxxxxxxxxxx>]

亀井さん、こんにちは。
次のように変えましたが、最後の詰めがうまくいきません。
------------------------
(defun gunzip-buffer ()
  (interactive)
  (let* ((old-buffer (selected-buffer))
  (old-file-name (get-buffer-file-name old-buffer))
  (new-file-name (string-right-trim ".gz\\" old-file-name))
  (new-buffer (create-new-buffer (file-namestring new-file-name))))
    (execute-shell-command "gunzip" old-file-name new-buffer)
    (pop-to-buffer new-buffer)))

-------------
須田誠也
EZU11330@xxxxxxxxxxx