Explorar el Código

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 hace 14 años
padre
commit
b3e1e7320f
Se han modificado 1 ficheros con 2 adiciones y 1 borrados
  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)