소스 검색

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 년 전
부모
커밋
b3e1e7320f
1개의 변경된 파일2개의 추가작업 그리고 1개의 파일을 삭제
  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)