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.
This commit is contained in:
Eric Schulte 2013-10-01 06:25:31 -06:00
parent 2c5251f0da
commit 01467ae083
1 changed files with 1 additions and 1 deletions

View File

@ -2168,7 +2168,7 @@ code ---- the results are extracted in the syntax of the source
(goto-char location) (goto-char location)
(when (looking-at (concat org-babel-result-regexp ".*$")) (when (looking-at (concat org-babel-result-regexp ".*$"))
(delete-region (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)))))))) (progn (forward-line 1) (org-babel-result-end))))))))
(defun org-babel-result-end () (defun org-babel-result-end ()