tec/org-mode
tec/org-mode
1
0
Fork 0
forked from mirrors/org-mode
Code Pull requests Releases Activity

ox-org: Obey to `org-display-custom-times'

Browse source 
* lisp/ox-org.el (org-org-timestamp): New function.
(org): Use new function.
This commit is contained in:
Nicolas Goaziou 2018-01-08 15:39:01 +01:00
parent c0a1fb4138
commit 857425e184
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/ox-org.el
View file

@ -96,7 +96,7 @@ setting of `org-html-htmlize-output-type' is `css'."
(table-cell . org-org-identity) (table-cell . org-org-identity)
(table-row . org-org-identity) (table-row . org-org-identity)
(target . org-org-identity) (target . org-org-identity)
(timestamp . org-org-identity) (timestamp . org-org-timestamp)
(underline . org-org-identity) (underline . org-org-identity)
(verbatim . org-org-identity) (verbatim . org-org-identity)
(verse-block . org-org-identity)) (verse-block . org-org-identity))
@ -206,6 +206,10 @@ as a communication channel."
(format "#+CREATOR: %s\n" (plist-get info :creator))) (format "#+CREATOR: %s\n" (plist-get info :creator)))
contents)) contents))
(defun org-org-timestamp (timestamp _contents _info)
"Transcode a TIMESTAMP object to custom format or back into Org syntax."
(org-timestamp-translate timestamp))
(defun org-org-section (section contents info) (defun org-org-section (section contents info)
"Transcode SECTION element back into Org syntax. "Transcode SECTION element back into Org syntax.
CONTENTS is the contents of the section. INFO is a plist used as CONTENTS is the contents of the section. INFO is a plist used as