From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Wed, 14 May 2003 00:57:02 +0000 (+0000)
Subject: (undo): Remove left over asserts.
X-Git-Tag: ttn-vms-21-2-B4~10167
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c86c975de6cb7f56c7a54daee73177500a78b85b;p=emacs.git

(undo): Remove left over asserts.
---

diff --git a/lisp/simple.el b/lisp/simple.el
index f83d096ed64..39a34f7f4a3 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -993,9 +993,6 @@ as an argument limits undo to changes within the current region."
     ;; undo operation, so we can skip them later on.
     ;; I don't know how to do that in the undo-in-region case.
     (unless undo-in-region
-      (when (eval-when-compile (fboundp 'assert))
-	(assert (or (null pending-undo-list) (car pending-undo-list)))
-	(assert (car buffer-undo-list)))
       (puthash buffer-undo-list pending-undo-list undo-equiv-table))
     ;; Don't specify a position in the undo record for the undo command.
     ;; Instead, undoing this should move point to where the change is.