summary refs log tree commit diff stats
path: root/lisp
diff options
context:
space:
mode:
authorCase Duckworth2022-01-17 17:12:34 -0600
committerCase Duckworth2022-01-17 17:12:34 -0600
commit309a34cea5a22d082fce87a1ecea378c41b17ff5 (patch)
tree6f09c3921dff7af029d04686f4127f0ce1c653f4 /lisp
parentSo! Many! Changes!! (diff)
downloademacs-309a34cea5a22d082fce87a1ecea378c41b17ff5.tar.gz
emacs-309a34cea5a22d082fce87a1ecea378c41b17ff5.zip
Open local HTML files with `browse-url'
Diffstat (limited to 'lisp')
-rw-r--r--lisp/+org.el10
1 files changed, 10 insertions, 0 deletions
diff --git a/lisp/+org.el b/lisp/+org.el index 348ba6e..5869622 100644 --- a/lisp/+org.el +++ b/lisp/+org.el
@@ -442,5 +442,15 @@ the deletion might narrow the column."
442 (org-up-heading-all 1)) 442 (org-up-heading-all 1))
443 (org-open-at-point arg))))) 443 (org-open-at-point arg)))))
444 444
445;;; Open local HTML files with `browse-url'
446
447(defun +org-open-html (file-path link-string)
448 "Open FILE-PATH with `browse-url'.
449This function is intended to use with `org-file-apps'. See the
450documentation of that function for a description of the two
451arguments here, FILE-PATH and LINK-STRING."
452 (message "Opening %s (%s)..." file-path link-string)
453 (browse-url file-path))
454
445(provide '+org) 455(provide '+org)
446;;; +org.el ends here 456;;; +org.el ends here