ob-exp: Fix small bug

* lisp/ob-exp.el (org-export-blocks-preprocess): Pos can sometimes be
  set to a value greater than start, because of indentation, and lead
  to a search bound error.

diff --git a/lisp/ob-exp.el b/lisp/ob-exp.el
index 8d11e45..a2b0f48 100644 (file)
--- a/lisp/ob-exp.el
+++ b/lisp/ob-exp.el
@@ -291,7 +291,7 @@ this template."
                                           (indent-line-to ind))
                         ;; Indent everything.
                         (indent-code-rigidly match-start (point) ind)))))
-             (setq pos (point))
+             (setq pos (line-beginning-position))
               ;; Cleanup markers.
              (set-marker match-start nil)
              (set-marker begin nil)