Skip to content
Browse files

kill buffers after exporting them

export buffers after the first are opened read-only otherwise
  • Loading branch information...
1 parent 6f22440 commit 137b054c7f747c689c12dc7c2fe570c78eb6698b Bryan Fink committed Feb 1, 2010
Showing with 6 additions and 3 deletions.
  1. +6 −3 orgbatch.el
View
9 orgbatch.el
@@ -22,9 +22,12 @@
;; command-line --eval functions
(defun riak-export-doc-file (filename format)
(find-file filename)
- (cond ((eq format 'ascii) (org-export-as-ascii 3))
- ((eq format 'html) (org-export-as-html 3))
- (message "Unknown export format")))
+ (cond ((eq format 'ascii) (org-export-as-ascii 3)
+ (kill-this-buffer))
+ ((eq format 'html) (org-export-as-html 3)
+ (kill-this-buffer))
+ (message "Unknown export format"))
+ (kill-this-buffer))
(defun riak-export-doc-dir (directory format)
(mapcar

0 comments on commit 137b054

Please sign in to comment.
Something went wrong with that request. Please try again.