From ef2ebd1e72ee3b96ffb82acf61e99255dbf712b7 Mon Sep 17 00:00:00 2001 From: David Maus Date: Sat, 2 Jul 2011 16:15:14 +0200 Subject: [PATCH 1/3] Call kill-buffer with argument nil * ob-haskell.el (org-babel-haskell-export-to-lhs): Call kill-buffer with argument indiciating to kill current buffer. Emacs 22 compatibility. GNU Emacs 22.3.2 (i686-pc-linux-gnu) of 2011-05-28 on x60s C-h f kill-buffer RET kill-buffer is an interactive built-in function in `C source code'. It is bound to C-x k. (kill-buffer buffer) Kill the buffer buffer. The argument may be a buffer or the name of a buffer. With a nil argument, kill the current buffer. --- lisp/ob-haskell.el | 4 ++-- 1 files changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/ob-haskell.el b/lisp/ob-haskell.el index 4e3e797..822f90a 100644 --- a/lisp/ob-haskell.el +++ b/lisp/ob-haskell.el @@ -192,7 +192,7 @@ constructs (header arguments, no-web syntax etc...) are ignored." (save-excursion ;; export to latex w/org and save as .lhs (find-file tmp-org-file) (funcall 'org-export-as-latex nil) - (kill-buffer) + (kill-buffer nil) (delete-file tmp-org-file) (find-file tmp-tex-file) (goto-char (point-min)) (forward-line 2) @@ -202,7 +202,7 @@ constructs (header arguments, no-web syntax etc...) are ignored." (replace-match (save-match-data (org-remove-indentation (match-string 0))) t t)) (setq contents (buffer-string)) - (save-buffer) (kill-buffer)) + (save-buffer) (kill-buffer nil)) (delete-file tmp-tex-file) ;; save org exported latex to a .lhs file (with-temp-file lhs-file (insert contents)) -- 1.7.2.5