Add to debug-ignored-errors.

diff --git a/lisp/comint.el b/lisp/comint.el
index a08cd097c7aaccecaac30388d88381cba1afe79c..eac6095bdb3d675037d0db1bb9172db2a633f4eb 100644 (file)
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -2726,6 +2726,13 @@ REGEXP-GROUP is the regular expression group in REGEXP to use."
                    results)))
       results)))
 
+(mapc (lambda (x)
+       (add-to-list 'debug-ignored-errors x))
+      '("^Not at command line$"
+       "^Empty input ring$"
+       "^No history$"
+       "^Not found$"                   ; Too common?
+       "^Current buffer has no process$"))
 \f
 ;; Converting process modes to use comint mode
 ;; ===========================================================================

diff --git a/lisp/imenu.el b/lisp/imenu.el
index 2f1ad7c9c0ce96796b96a45447742fb2374e950c..64a5bd9941fd0a0986e1298ae1b04d454bb0f4f6 100644 (file)
--- a/lisp/imenu.el
+++ b/lisp/imenu.el
@@ -1101,6 +1101,12 @@ for more information."
           (apply function (car index-item) position rest))))
   (run-hooks 'imenu-after-jump-hook))
 
+(dolist (mess
+        '("^No items suitable for an index found in this buffer$"
+          "^This buffer cannot use `imenu-default-create-index-function'$"
+          "^The mode `.*' does not support Imenu$"))
+  (add-to-list 'debug-ignored-errors mess))
+
 (provide 'imenu)
 
 ;;; imenu.el ends here

diff --git a/lisp/mail/mh-e.el b/lisp/mail/mh-e.el
index 12a7ea9de47e516fe939488f41ab70a13cd7a0b1..afdb8ec384c82ea2059957329dce848f8d91b40d 100644 (file)
--- a/lisp/mail/mh-e.el
+++ b/lisp/mail/mh-e.el
@@ -60,7 +60,7 @@
 ;; Modified by James Larus, BBN, July 1984 and UCB, 1984 & 1985.
 ;; Rewritten for GNU Emacs, James Larus 1985.  larus@ginger.berkeley.edu
 ;; Modified by Stephen Gildea 1988.  gildea@lcs.mit.edu
-(defconst mh-e-RCS-id "$Id: mh-e.el,v 1.22 1999/11/09 13:40:03 gerd Exp $")
+(defconst mh-e-RCS-id "$Id: mh-e.el,v 1.23 2000/03/07 12:36:39 gerd Exp $")
 
 ;;; Code:
 
@@ -1521,4 +1521,8 @@ If optional prefix argument provided, then prompt for the message sequence." t)
 (autoload 'mh-rename-seq "mh-seq"
   "Rename SEQUENCE to have NEW-NAME." t)
 
+(dolist (mess '("^Cursor not pointing to message$"
+               "^There is no other window$"))
+  (add-to-list 'debug-ignored-errors mess))
+
 ;;; mh-e.el ends here

diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index e1f04d4a31424ebe4194ca8dfb46143c9d98b408..ef86ac1591798b22be0a9c984d4a1ce1d4aaa232 100644 (file)
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -2028,6 +2028,8 @@ An error message with no file name and no file name has been seen earlier"))
                  (substring dir (length parent-expanded)))))
   dir)
 
+(add-to-list 'debug-ignored-errors "^No more errors\\( yet\\|\\)$")
+
 (provide 'compile)
 
 ;;; compile.el ends here

diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index 206d8ce94a68cb90ff3386ab571d3f4a9bb1c08c..dc29f78ae5aee4283f5449e833949a4097c8f899 100644 (file)
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -3180,6 +3180,7 @@ Both should not be used to define a buffer-local dictionary."
                          (insert comment-end)))))
              (insert (concat " " word))))))))
 
+(add-to-list 'debug-ignored-errors "^No word found to check!$")
 
 (provide 'ispell)