[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Yet another oddmuse mode for Emacs.
From: |
rubikitch |
Subject: |
Re: Yet another oddmuse mode for Emacs. |
Date: |
Sun, 11 Jan 2009 06:54:09 +0900 (JST) |
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/