Add colour box.
parent
bb6f3d8a0b
commit
661a5a6504
16
publish.el
16
publish.el
|
@ -8,6 +8,7 @@
|
||||||
(package-initialize)
|
(package-initialize)
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
(use-package ox-publish
|
(use-package ox-publish
|
||||||
:init
|
:init
|
||||||
(setq org-html-validation-link nil
|
(setq org-html-validation-link nil
|
||||||
|
@ -18,6 +19,21 @@
|
||||||
org-html-htmlize-output-type nil
|
org-html-htmlize-output-type nil
|
||||||
org-babel-python-command "python3")
|
org-babel-python-command "python3")
|
||||||
:config
|
:config
|
||||||
|
(org-add-link-type
|
||||||
|
"color"
|
||||||
|
(lambda (path)
|
||||||
|
(message (concat "color "
|
||||||
|
(progn (add-text-properties
|
||||||
|
0 (length path)
|
||||||
|
(list 'face `((t (:foreground ,path))))
|
||||||
|
path) path))))
|
||||||
|
(lambda (path desc format)
|
||||||
|
(cond
|
||||||
|
((eq format 'html)
|
||||||
|
(format "<span style=\"color:%s;\">%s</span>" path desc))
|
||||||
|
((eq format 'latex)
|
||||||
|
(format "{\\color{%s}%s}" path desc)))))
|
||||||
|
|
||||||
(org-babel-do-load-languages
|
(org-babel-do-load-languages
|
||||||
'org-babel-load-languages
|
'org-babel-load-languages
|
||||||
'(
|
'(
|
||||||
|
|
Loading…
Reference in New Issue