Mercurial > hg > xemacs-beta
diff lisp/prim/simple.el @ 28:1917ad0d78d7 r19-15b97
Import from CVS: tag r19-15b97
author | cvs |
---|---|
date | Mon, 13 Aug 2007 08:51:55 +0200 |
parents | 4103f0995bd7 |
children | ec9a17fef872 |
line wrap: on
line diff
--- a/lisp/prim/simple.el Mon Aug 13 08:51:34 2007 +0200 +++ b/lisp/prim/simple.el Mon Aug 13 08:51:55 2007 +0200 @@ -73,6 +73,9 @@ (not (get-char-property (1- (point)) 'read-only)) ;; Make sure the newline before point isn't invisible. (not (get-char-property (1- (point)) 'invisible)) + ;; This should probably also test for the previous char + ;; being the *last* character too. + (not (get-char-property (1- (point)) 'end-open)) ;; Make sure the newline before point has the same ;; properties as the char before it (if any). (< (or (previous-extent-change (point)) -2)