[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Yet another oddmuse mode for Emacs.
From: |
Andy Stewart |
Subject: |
Re: Yet another oddmuse mode for Emacs. |
Date: |
Sun, 11 Jan 2009 08:58:29 +0800 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/23.0.60 (gnu/linux) |
Hi rubikitch,
address@hidden writes:
> From: Andy Stewart <address@hidden>
> Subject: Yet another oddmuse mode for Emacs.
> Date: Fri, 09 Jan 2009 17:18:18 +0800
>
>> I have develop complete with yaoddmuse.el
>
> kill-buffer has a must-have argument in Emacs22.
>
> --- yaoddmuse.el 2009-01-11 06:45:44.539321758 +0900
> +++ yaoddmuse.el 2009-01-11 06:50:10.553725522 +0900
> @@ -772,7 +772,7 @@
> (with-current-buffer (get-buffer retrieve-buffer-name)
> (setq table (mapcar 'list (split-string (buffer-string))))
> (puthash wikiname table yaoddmuse-pages-hash)
> - (kill-buffer))
> + (kill-buffer (current-buffer)))
> ;; Add special action.
> (when (and (fboundp handle-function)
> handle-function)
> @@ -819,7 +819,7 @@
> (with-current-buffer (get-buffer retrieve-buffer-name)
> (prog1
> (buffer-string)
> - (kill-buffer))))
> + (kill-buffer (current-buffer)))))
> (goto-char (point-min))
> ;; Switch or popup page.
> (message "Get page '%s' form '%s' successful." pagename wikiname)
>
> --
> rubikitch
> Blog: http://d.hatena.ne.jp/rubikitch/
> Site: http://www.rubyist.net/~rubikitch/
Thanks for your advice.
I have apply it.
Enjoy! ;)
-- Andy