mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-27 16:51:06 -07:00
Code Issues Projects Releases Wiki Activity

Add to debug-ignored-errors.

Browse source
This commit is contained in:
Dave Love 2000-05-22 17:41:53 +00:00
parent 87207d1407
commit f1ed9461a9
5 changed files with 21 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lisp/comint.el
View file

@ -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
;; ===========================================================================

6
lisp/imenu.el
View file

@ -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

6
lisp/mail/mh-e.el
View file

@ -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

2
lisp/progmodes/compile.el
View file

@ -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

1
lisp/textmodes/ispell.el
View file

@ -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)