diff options
| author | Dave Love <fx@gnu.org> | 2000-05-22 17:41:53 +0000 |
|---|---|---|
| committer | Dave Love <fx@gnu.org> | 2000-05-22 17:41:53 +0000 |
| commit | f1ed9461a981f02ee73359e16e102d59b148a89b (patch) | |
| tree | f06513a73bfd48244137b8af08c696ba6605cc21 | |
| parent | 87207d14072ad049fff1e34643b0e180f7e2ea0d (diff) | |
| download | emacs-f1ed9461a981f02ee73359e16e102d59b148a89b.tar.gz | |
Add to debug-ignored-errors.
| -rw-r--r-- | lisp/comint.el | 7 | ||||
| -rw-r--r-- | lisp/imenu.el | 6 | ||||
| -rw-r--r-- | lisp/mail/mh-e.el | 6 | ||||
| -rw-r--r-- | lisp/progmodes/compile.el | 2 | ||||
| -rw-r--r-- | lisp/textmodes/ispell.el | 1 |
5 files changed, 21 insertions, 1 deletions
diff --git a/lisp/comint.el b/lisp/comint.el index a08cd097c7a..eac6095bdb3 100644 --- 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$")) ;; Converting process modes to use comint mode ;; =========================================================================== diff --git a/lisp/imenu.el b/lisp/imenu.el index 2f1ad7c9c0c..64a5bd9941f 100644 --- 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 12a7ea9de47..afdb8ec384c 100644 --- 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 e1f04d4a314..ef86ac15917 100644 --- 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 206d8ce94a6..dc29f78ae5a 100644 --- 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) |