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)