diff options
author | Eric Schulte <schulte.eric@gmail.com> | 2013-10-01 06:25:31 -0600 |
---|---|---|
committer | Eric Schulte <schulte.eric@gmail.com> | 2013-10-01 06:25:31 -0600 |
commit | 01467ae08345e52ed28271a1578b9c34005c5203 (patch) | |
tree | 26e79685173015340cd903d4b025ba9946c391b2 | |
parent | 2c5251f0dab97a5101f15a5b574fdf66bbb71b6a (diff) | |
download | org-mode-01467ae08345e52ed28271a1578b9c34005c5203.tar.gz |
remove leading newline when removing a result
This fixes a number of new test failures
* lisp/ob-core.el (org-babel-remove-result): Remove leading newline
when removing a result.
-rw-r--r-- | lisp/ob-core.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/ob-core.el b/lisp/ob-core.el index a7c227b..4f9c149 100644 --- a/lisp/ob-core.el +++ b/lisp/ob-core.el @@ -2168,7 +2168,7 @@ code ---- the results are extracted in the syntax of the source (goto-char location) (when (looking-at (concat org-babel-result-regexp ".*$")) (delete-region - (if keep-keyword (1+ (match-end 0)) (match-beginning 0)) + (if keep-keyword (1+ (match-end 0)) (1- (match-beginning 0))) (progn (forward-line 1) (org-babel-result-end)))))))) (defun org-babel-result-end () |