summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorKyle Meyer <kyle@kyleam.com>2014-09-14 02:04:02 -0400
committerKyle Meyer <kyle@kyleam.com>2014-09-14 02:04:02 -0400
commitb725c8a98daf0ad14e4bf9db936977ce030e51d1 (patch)
tree99fc83e7b069756b89cbd1b6d5fa756f6c8de698 /lisp
parentdcbf8c2aaba1ac8a713358a25d6c568619368a59 (diff)
downloademacs.d-b725c8a98daf0ad14e4bf9db936977ce030e51d1.tar.gz
Add interactive version of org-open-file
Diffstat (limited to 'lisp')
-rw-r--r--lisp/init-org.el6
1 files changed, 6 insertions, 0 deletions
diff --git a/lisp/init-org.el b/lisp/init-org.el
index b11a82a..dafc0d4 100644
--- a/lisp/init-org.el
+++ b/lisp/init-org.el
@@ -46,6 +46,11 @@
(org-open-file file)
(user-error "No file at point"))))
+(defun km/org-open-file ()
+ "Interactive version of `org-open-file'."
+ (interactive)
+ (org-open-file (read-file-name "Open file" nil nil t)))
+
(defun km/org-open-annex-file ()
"Open a git annex file with `org-open-file'."
(interactive)
@@ -57,6 +62,7 @@
(after 'init-buffile
(define-key km/file-map "a" 'km/org-open-annex-file)
+ (define-key km/file-map "o" 'km/org-open-file)
(define-key km/file-map "p" 'km/org-open-file-at-point))
(setq initial-major-mode 'org-mode)