Преглед изворни кода

babel: cleanup trailing newline after removed #+source and #+results lines

* contrib/babel/lisp/org-babel-exp.el (org-exp-res/src-name-cleanup):
  cleanup trailing newline after removed #+source and #+results lines
Eric Schulte пре 15 година
родитељ
комит
d45826943a
1 измењених фајлова са 1 додато и 1 уклоњено
  1. 1 1
      contrib/babel/lisp/org-babel-exp.el

+ 1 - 1
contrib/babel/lisp/org-babel-exp.el

@@ -127,7 +127,7 @@ processing has taken place."
 	    nil t)
 	    nil t)
       (delete-region
       (delete-region
        (progn (beginning-of-line) (point))
        (progn (beginning-of-line) (point))
-       (progn (end-of-line) (point))))))
+       (progn (end-of-line) (+ 1 (point)))))))
 
 
 (defun org-babel-in-example-or-verbatim ()
 (defun org-babel-in-example-or-verbatim ()
   "Return true if the point is currently in an escaped portion of
   "Return true if the point is currently in an escaped portion of