# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1054121144 0
# Node ID f0563005bb3d09f736176a6bc34e1c04d934b0bd
# Parent  2ec687b0ad32d331c8ff552d0e1e0befdf9cc3be
(type-break-cancel-function-timers): Use with-no-warnings.

diff -r 2ec687b0ad32 -r f0563005bb3d lisp/type-break.el
--- a/lisp/type-break.el	Wed May 28 11:24:51 2003 +0000
+++ b/lisp/type-break.el	Wed May 28 11:25:44 2003 +0000
@@ -8,7 +8,7 @@
 ;; Status: Works in GNU Emacs 19.25 or later, some versions of XEmacs
 ;; Created: 1994-07-13
 
-;; $Id: type-break.el,v 1.26 2003/04/11 13:06:22 jpw Exp $
+;; $Id: type-break.el,v 1.27 2003/05/06 17:50:17 lektu Exp $
 
 ;; This file is part of GNU Emacs.
 
@@ -981,11 +981,12 @@
                   (funcall 'delete-timer (car list)))
              (setq list (cdr list)))))
         ((memq type-break-emacs-variant '(xemacs lucid))
-         (let ((list itimer-list))
-           (while list
-             (and (eq (funcall 'itimer-function (car list)) function)
-                  (funcall 'delete-itimer (car list)))
-             (setq list (cdr list)))))))
+	 (with-no-warnings
+	  (let ((list itimer-list))
+	    (while list
+	      (and (eq (funcall 'itimer-function (car list)) function)
+		   (funcall 'delete-itimer (car list)))
+	      (setq list (cdr list))))))))
 
 
 ;;; Demo wrappers