File tree Expand file tree Collapse file tree
Expand file tree Collapse file tree Original file line number Diff line number Diff line change @@ -2822,6 +2822,20 @@ ref:https://github.com/manateelazycat/toggle-one-window
28222822 (with-eval-after-load 'org
28232823 (org-link-set-parameters "denote" :export #'my-hugo--denote-blog-link-ol-export))
28242824
2825+ (defun my-hugo*convert-denote-cpp-to-cpp (args)
2826+ "将 ARGS 中 src-block 的 :language 从 denote-cpp 改为 cpp。"
2827+ (let ((src-block (car args))
2828+ (contents (cadr args))
2829+ (info (caddr args)))
2830+ ;; 复制 src-block 以避免副作用
2831+ (setq src-block (org-element-copy src-block))
2832+ (when (eq (org-element-type src-block) 'src-block)
2833+ (let ((lang (org-element-property :language src-block)))
2834+ (when (string= lang "denote-cpp")
2835+ (org-element-put-property src-block :language "cpp"))))
2836+ (list src-block contents info)))
2837+
2838+ (advice-add #'org-hugo-src-block :filter-args #'my-hugo*convert-denote-cpp-to-cpp)
28252839
28262840 ;; D:/Data/Blogs/images/1.png ==> https://images.xhcoding.cn/blog/1.png
28272841 (defun my-hugo*convert-path-to-url (args)
You can’t perform that action at this time.
0 commit comments