diff options
author | Jambunathan K <kjambunathan@gmail.com> | 2012-09-03 19:29:21 +0530 |
---|---|---|
committer | Jambunathan K <kjambunathan@gmail.com> | 2012-09-03 20:23:33 +0530 |
commit | 256bb297809409cc721086f1177ed1754d7557ea (patch) | |
tree | d2299707ee7e23bf0b0f4c9a55e65e83c875f1ea | |
parent | 7719734dd7b216e29ee7f5be5077d13004903a7d (diff) | |
download | org-mode-256bb297809409cc721086f1177ed1754d7557ea.tar.gz |
org-odt.el: Open OpenDocument files in os-specific way
* lisp/org-lparse.el (org-lparse-and-open)
(org-lparse-do-convert): Open exported files with
system-specific application.
* lisp/org-odt.el: Don't meddle with `org-file-apps'.
-rw-r--r-- | lisp/org-lparse.el | 4 | ||||
-rw-r--r-- | lisp/org-odt.el | 3 |
2 files changed, 2 insertions, 5 deletions
diff --git a/lisp/org-lparse.el b/lisp/org-lparse.el index 52518b3..9d1e034 100644 --- a/lisp/org-lparse.el +++ b/lisp/org-lparse.el @@ -67,7 +67,7 @@ lists." ((file-exists-p file-or-buf) file-or-buf) (t (error "org-lparse-and-open: This shouldn't happen")))) (message "Opening file %s" f) - (org-open-file f) + (org-open-file f 'system) (when org-export-kill-product-buffer-when-displayed (kill-buffer (current-buffer)))))) @@ -509,7 +509,7 @@ This is a helper routine for interactive use." (message "Exported to %s" out-file) (when prefix-arg (message "Opening %s..." out-file) - (org-open-file out-file)) + (org-open-file out-file 'system)) out-file) (t (message "Export to %s failed" out-file) diff --git a/lisp/org-odt.el b/lisp/org-odt.el index c80821f..fbb31d5 100644 --- a/lisp/org-odt.el +++ b/lisp/org-odt.el @@ -243,9 +243,6 @@ standard Emacs.") (mapc (lambda (desc) - ;; Let Org open all OpenDocument files using system-registered app - (add-to-list 'org-file-apps - (cons (concat "\\." (car desc) "\\'") 'system)) ;; Let Emacs open all OpenDocument files in archive mode (add-to-list 'auto-mode-alist (cons (concat "\\." (car desc) "\\'") 'archive-mode))) |