Applied, thanks.
- Carsten
On Aug 17, 2009, at 9:49 PM, Eric Schulte wrote:
Hi,
Please apply the attached patch which replaces `indent-region' with
`indent-code-rigidly' in org-exp-blocks. This fixes the problem of
indentation being removed from source-code blocks.
Thanks -- Eric
diff --git a/lisp/org-exp-blocks.el b/lisp/org-exp-blocks.el
index 6025ce7..8df0ac1 100644
--- a/lisp/org-exp-blocks.el
+++ b/lisp/org-exp-blocks.el
@@ -203,9 +203,8 @@ specified in BLOCKS which default to the value of
""
(apply func (save-match-data (org-
remove-indentation (match-stri
(split-string (match-
string 3) " ")))) t t)
- ;; indent the replaced match
- (indent-region (match-beginning 0) (match-end 0)
indentation)
- ))
+ ;; indent block
+ (indent-code-rigidly (match-beginning 0) (match-end
0) indentation)))
(setf start (save-match-data (match-end 0))))
(mapcar (lambda (type)
(interblock start (point-max) type))
_______________________________________________
Emacs-orgmode mailing list
Remember: use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode
_______________________________________________
Emacs-orgmode mailing list
Remember: use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode
