爲org-mode增加video link導出html video tag

原文地址:https://lujun9972.github.io/blog/2020/01/09/爲org-mode增加video-link導出html-video-tag/index.html

org導出html的一個難點就是內嵌視頻,基本上需要通過內嵌html的方式來插入視頻,像下面這樣：

#+begin_export html
<video class="wp-video-shortcode" width="640" height="360" preload="metadata" controls="controls"><source type="video/mp4" src="./Baby唱小金魚.mp4" /></video>
#+end_export

但是這種方式太繁瑣了，不如直接自定義一個video link，在導出成html時幫我自動生成video tag片段.如下所示:

(defun org-video-link-export (path desc backend)
  (let ((ext (file-name-extension path)))
    (cond
     ((eq 'html backend)
      (format "<video preload='metadata' controls='controls'><source type='video/%s' src='%s' /></video>" ext path))
     ;; fall-through case for everything else
     (t
      path))))

(org-link-set-parameters "video" :export 'org-video-link-export)

(org-export-string-as "video:xxx.mp4" 'html t)

<p>
<video preload='metadata' controls='controls'><source type='video/mp4' src='xxx.mp4' /></video></p>