From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 14 Aug 1993 03:50:26 +0000 (+0000)
Subject: (internal_equal): All markers in no buffer are equal.
X-Git-Tag: emacs-19.34~11238
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5843fef34696e776b9605735b1e24c98bfc89b3a;p=emacs.git

(internal_equal): All markers in no buffer are equal.
---

diff --git a/src/fns.c b/src/fns.c
index 192711ec27c..556aaa38f28 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -870,9 +870,10 @@ do_cdr:
     }
   if (XTYPE (o1) == Lisp_Marker)
     {
-      return (XMARKER (o1)->buffer == XMARKER (o2)->buffer
-	      && XMARKER (o1)->bufpos == XMARKER (o2)->bufpos)
-	? Qt : Qnil;
+      return ((XMARKER (o1)->buffer == XMARKER (o2)->buffer
+	      && (NILP (XMARKER (o1)->buffer)
+		  || XMARKER (o1)->bufpos == XMARKER (o2)->bufpos))
+	      ? Qt : Qnil);
     }
   if (XTYPE (o1) == Lisp_Vector
       || XTYPE (o1) == Lisp_Compiled)