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

Fix blockquote support

This commit is contained in:
Carsten Dominik 2009-06-07 22:10:05 +02:00
parent a68ff7f101
commit 5ccc098ebd
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/org-exp.el
View File

@ -1695,9 +1695,9 @@ These special cookies will later be interpreted by the backend."
(setq end (1+ (point-at-eol))
end1 (1- (match-beginning 0)))
(setq content (org-remove-indentation (buffer-substring beg1 end1)))
(setq content (concat "ORG-" (upcase type) "-START\n"
(setq content (concat "ORG-" (upcase t1) "-START\n"
content "\n"
"ORG-" (upcase type) "-END\n"))
"ORG-" (upcase t1) "-END\n"))
(delete-region beg end)
(insert (org-add-props content nil 'original-indentation ind))))))