# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 845003460 0
# Node ID fb6785d0c25617734ab23dfd9742f98fa7b4fc45
# Parent  c7622616333c8744ea6f5c5ebde64d4359fd6ef5
(newline): Use buffer-has-markers-at.

diff -r c7622616333c -r fb6785d0c256 lisp/simple.el
--- a/lisp/simple.el	Fri Oct 11 02:34:27 1996 +0000
+++ b/lisp/simple.el	Fri Oct 11 03:11:00 1996 +0000
@@ -39,6 +39,8 @@
   ;; the end of the previous line.
   (let ((flag (and (not (bobp)) 
 		   (bolp)
+		   ;; Make sure there are no markers here.
+		   (not (buffer-has-markers-at (1- (point))))
 		   ;; Make sure the newline before point isn't intangible.
 		   (not (get-char-property (1- (point)) 'intangible))
 		   ;; Make sure the newline before point isn't read-only.