1 files changed, 10 insertions, 0 deletions

@@ -442,5 +442,15 @@ the deletion might narrow the column."
           (org-up-heading-all 1))
         (org-open-at-point arg)))))
 
+;;; Open local HTML files with `browse-url'
+
+(defun +org-open-html (file-path link-string)
+  "Open FILE-PATH with `browse-url'.
+This function is intended to use with `org-file-apps'.  See the
+documentation of that function for a description of the two
+arguments here, FILE-PATH and LINK-STRING."
+  (message "Opening %s (%s)..." file-path link-string)
+  (browse-url file-path))
+
 (provide '+org)
 ;;; +org.el ends here