Browse Source

org.el: Don't throw an error when editing takes place at the first point of the buffer.

* org.el (org-self-insert-command): Don't throw an error when
editing takes place at the first point of the buffer.

Thanks to Carsten Dominik for pointing this error.
Bastien Guerry 14 năm trước cách đây
mục cha
commit
b3e1e7320f
1 tập tin đã thay đổi với 2 bổ sung1 xóa
  1. 2 1
      lisp/org.el

+ 2 - 1
lisp/org.el

@@ -17396,7 +17396,8 @@ overwritten, and the table is not marked as requiring realignment."
   (let ((invisible-at-point
 	 (car (get-char-property-and-overlay (point) 'invisible)))
 	(invisible-before-point
-	 (car (get-char-property-and-overlay (1- (point)) 'invisible))))
+	 (or (bobp) (car (get-char-property-and-overlay 
+			  (1- (point)) 'invisible)))))
     (when (or (eq invisible-at-point 'outline)
 	    (eq invisible-at-point 'org-hide-block)
 	    (eq invisible-before-point 'outline)