tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

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.
This commit is contained in:
Bastien Guerry 2011-10-30 09:58:37 +01:00
parent d3370f1608
commit b3e1e7320f
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/org.el
View File

@ -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)