mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-08-25 05:32:51 +00:00
Export: Remove extra space before colon examples.
This commit is contained in:
parent
3fed83614e
commit
2ad63638b5
|
@ -1,5 +1,8 @@
|
||||||
2009-01-25 Carsten Dominik <carsten.dominik@gmail.com>
|
2009-01-25 Carsten Dominik <carsten.dominik@gmail.com>
|
||||||
|
|
||||||
|
* org-exp.el (org-export-as-html): Remove the initial space from
|
||||||
|
colon examples.
|
||||||
|
|
||||||
* org.el (org-scan-tags): Call
|
* org.el (org-scan-tags): Call
|
||||||
`org-agenda-check-for-timestamp-as-reason-to-ignore-todo-item'.
|
`org-agenda-check-for-timestamp-as-reason-to-ignore-todo-item'.
|
||||||
|
|
||||||
|
|
|
@ -3485,12 +3485,12 @@ lang=\"%s\" xml:lang=\"%s\">
|
||||||
|
|
||||||
;; Fixed-width, verbatim lines (examples)
|
;; Fixed-width, verbatim lines (examples)
|
||||||
(when (and org-export-with-fixed-width
|
(when (and org-export-with-fixed-width
|
||||||
(string-match "^[ \t]*:\\(\\([ \t]\\|$\\).*\\)" line))
|
(string-match "^[ \t]*:\\(\\([ \t]\\|$\\)\\(.*\\)\\)" line))
|
||||||
(when (not infixed)
|
(when (not infixed)
|
||||||
(setq infixed t)
|
(setq infixed t)
|
||||||
(org-close-par-maybe)
|
(org-close-par-maybe)
|
||||||
(insert "<pre class=\"example\">\n"))
|
(insert "<pre class=\"example\">\n"))
|
||||||
(insert (org-html-protect (match-string 1 line)) "\n")
|
(insert (org-html-protect (match-string 3 line)) "\n")
|
||||||
(when (or (not lines)
|
(when (or (not lines)
|
||||||
(not (string-match "^[ \t]*\\(:.*\\)"
|
(not (string-match "^[ \t]*\\(:.*\\)"
|
||||||
(car lines))))
|
(car lines))))
|
||||||
|
|
Loading…
Reference in a new issue