mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-09-12 11:09:57 +00:00
Remove extra newline after transformed code examples
This commit is contained in:
parent
1af7fdfdcd
commit
3bc637a2a1
|
@ -1,5 +1,8 @@
|
||||||
2009-12-09 Carsten Dominik <carsten.dominik@gmail.com>
|
2009-12-09 Carsten Dominik <carsten.dominik@gmail.com>
|
||||||
|
|
||||||
|
* org-exp.el (org-export-replace-src-segments-and-examples): Also
|
||||||
|
take the final newline after the END line.
|
||||||
|
|
||||||
* org.el (org-clean-visibility-after-subtree-move): Only fix
|
* org.el (org-clean-visibility-after-subtree-move): Only fix
|
||||||
entries that are not entirely invisible already.
|
entries that are not entirely invisible already.
|
||||||
(org-insert-link): Respect org-link-file-path-type for
|
(org-insert-link): Respect org-link-file-path-type for
|
||||||
|
|
|
@ -2266,7 +2266,7 @@ in the list) and remove property and value from the list in LISTVAR."
|
||||||
lang code trans opts indent)
|
lang code trans opts indent)
|
||||||
(goto-char (point-min))
|
(goto-char (point-min))
|
||||||
(while (re-search-forward
|
(while (re-search-forward
|
||||||
"\\(^\\([ \t]*\\)#\\+BEGIN_SRC:?[ \t]+\\([^ \t\n]+\\)\\(.*\\)\n\\([^\000]+?\n\\)[ \t]*#\\+END_SRC.*\\)\\|\\(^\\([ \t]*\\)#\\+BEGIN_EXAMPLE:?\\(?:[ \t]+\\(.*\\)\\)?\n\\([^\000]+?\n\\)[ \t]*#\\+END_EXAMPLE.*\\)"
|
"\\(^\\([ \t]*\\)#\\+BEGIN_SRC:?[ \t]+\\([^ \t\n]+\\)\\(.*\\)\n\\([^\000]+?\n\\)[ \t]*#\\+END_SRC.*\n?\\)\\|\\(^\\([ \t]*\\)#\\+BEGIN_EXAMPLE:?\\(?:[ \t]+\\(.*\\)\\)?\n\\([^\000]+?\n\\)[ \t]*#\\+END_EXAMPLE.*\n?\\)"
|
||||||
nil t)
|
nil t)
|
||||||
(if (match-end 1)
|
(if (match-end 1)
|
||||||
;; src segments
|
;; src segments
|
||||||
|
|
Loading…
Reference in a new issue