From xemacs-m  Fri Jun 27 05:11:58 1997
Received: from jagor.srce.hr (hniksic@jagor.srce.hr [161.53.2.130])
	by xemacs.org (8.8.5/8.8.5) with ESMTP id FAA29446
	for <xemacs-beta@xemacs.org>; Fri, 27 Jun 1997 05:11:56 -0500 (CDT)
Received: (from hniksic@localhost)
          by jagor.srce.hr (8.8.5/8.8.4)
	  id MAA20513; Fri, 27 Jun 1997 12:11:57 +0200 (MET DST)
To: XEmacs Developers <xemacs-beta@xemacs.org>
Subject: [PATCH] `debug-ignored-errors' update
X-Attribution: Hrv
X-Face: Mie8:rOV<\c/~z{s.X4A{!?vY7{drJ([U]0O=W/<W*SMo/Mv:58:*_y~ki>xDi&N7XG
        KV^$k0m3Oe/)'e%3=$PCR&3ITUXH,cK>]bci&<qQ>Ff%x_>1`T(+M2Gg/fgndU%k*ft
        [(7._6e0n-V%|%'[c|q:;}td$#INd+;?!-V=c8Pqf}3J
From: Hrvoje Niksic <hniksic@srce.hr>
Date: 27 Jun 1997 12:11:57 +0200
Message-ID: <kig67v0cq36.fsf@jagor.srce.hr>
Lines: 138
X-Mailer: Gnus v5.4.59/XEmacs 20.3(beta9) - "Sofia"

Now that `debug-ignored-errors' finally works properly (or so it
seems), here is an update for it:

--- lisp/prim/loaddefs.el.orig	Fri Jun 27 11:47:02 1997
+++ lisp/prim/loaddefs.el	Fri Jun 27 12:09:06 1997
@@ -69,12 +69,14 @@
 ;;; already has an autoload section in this file.
 ;;; **********************************************************************
 
+
 ;;; Code:
 
 ;; These variables are used by autoloadable packages.
 ;; They are defined here so that they do not get overridden
 ;; by the loading of those packages.
 
+
 ;; Names in directory that end in one of these
 ;; are ignored in completion,
 ;; making it more likely you will get a unique match.
@@ -90,74 +92,70 @@
 		  ".lof" ".blg" ".bbl" ".glo" ".idx" ".lot" ".fmt"
 		  ".diff" ".oi"))))
 
+
 (setq debug-ignored-errors
       '(beginning-of-line
 	beginning-of-buffer
 	end-of-line
         end-of-buffer
 	end-of-file buffer-read-only
-	"^Previous command was not a yank\\'"
-	"^Minibuffer window is not active\\'"
-	"^End of history; no next item\\'"
-	"^Beginning of history; no preceding item\\'"
-	"^No recursive edit is in progress\\'"
-	"^Changes to be undone are outside visible portion of buffer\\'"
-	"^No undo information in this buffer\\'"
-	"^No further undo information\\'"
-	"^Save not confirmed\\'"
-	"^Recover-file cancelled\\.\\'"
+	"\\`Previous command was not a yank\\'"
+	"\\`Minibuffer is not active for completion\\'"
+	"\\`No \\(following\\|preceding\\) item in .*-history\\'"
+	"\\`No recursive edit is in progress\\'"
+	"\\`Changes to be undone are outside visible portion of buffer\\'"
+	"\\`No further undo information\\'"
+	"\\`No undo information in this buffer\\'"
+	"\\`Buffer modified since last undo/redo, cannot redo"
+	"\\`Save not confirmed\\'"
+	"\\`Canceled\\'"
+	"\\`\\(Revert\\|Steal\\|Recover-file\\) cancelled\\.\\'"
 
 	;; comint
-	"^Not at command line\\'"
-	"^Empty input ring\\'"
-	"^No history\\'"
-	"^Not found\\'";; To common?
-	"^Current buffer has no process\\'"
+	"\\`Not at command line\\'"
+	"\\`Empty input ring\\'"
+	"\\`No history\\'"
+	"\\`Not found\\'" ;; To common?
+	"\\`Current buffer has no process\\'"
 
 	;; dabbrev
-	"^No dynamic expansion for \".*\" found\\.\\'"
-	"^No further dynamic expansions for \".*\" found\\.\\'"
-	"^No further dynamic expansions for `.*' found\\'"
+	"\\`No \\(further \\)?dynamic expansion for .* found\\.?\\'"
 
 	;; Completion
-	"^To complete, the point must be after a symbol at least [0-9]* character long\\.\\'"
-	"^The string \".*\" is too short to be saved as a completion\\.\\'"
+	"\\`To complete, the point must be after a symbol at least [0-9]* character long\\.\\'"
+	"\\`The string \".*\" is too short to be saved as a completion\\.\\'"
 
 	;; Compile
-	"^No more errors\\( yet\\|\\)\\'"
+	"\\`No more errors\\( yet\\|\\)\\'"
 
 	;; Gnus
-	"^NNTP: Connection closed\\.\\'"
+	;"\\`NNTP: Connection closed\\.\\'"
 
 	;; info
-	"^Node has no Previous\\'"
-	"^No \".*\" in index\\'"
+	"\\`Node has no Previous\\'"
+	"\\`No \".*\" in index\\'"
 
 	;; imenu
-	"^No items suitable for an index found in this buffer\\.\\'"
-	"^The mode \".*\" does not take full advantage of imenu\\.el yet\\.\\'"
+	;"\\`No items suitable for an index found in this buffer\\.\\'"
+	;"\\`The mode \".*\" does not take full advantage of imenu\\.el yet\\.\\'"
 
 	;; ispell
-	"^No word found to check!\\'"
+	"\\`No word found to check!\\'"
 
 	;; man
+	"\\`.* not found\\'"
+	"\\`No more history\\.\\'"
 
 	;; etags
-	"^No tags table in use!  Use .* to select one\\.\\'"
-	"^There is no default tag\\'"
-	"^No previous tag locations\\'"
-	"^File .* is not a valid tags table\\'"
-	"^No \\(more \\|\\)tags \\(matching\\|containing\\) "
-	"^Rerun etags: `.*' not found in "
-	"^All files processed\\.\\'"
-	"^No .* or .* in progress.\\'"
-	"^File .* not in current tags tables\\'"
-	"No tags table loaded."
-	"^Nothing to complete\\'"
+	"\\`File .* is not a valid tag table\\'"
+	"\\`File .* is not a valid tags file\\'"
+	"\\`All files processed\\.\\'"
+	"No TAGS file name supplied\\'"
+	"\\`Nothing to complete\\'"
 
 	;; BBDB
-	"^no previous record\\'"
-	"^no next record\\'"))
+	"\\`no previous record\\'"
+	"\\`no next record\\'"))
 
 (make-variable-buffer-local 'indent-tabs-mode)
 


-- 
Hrvoje Niksic <hniksic@srce.hr> | Student at FER Zagreb, Croatia
--------------------------------+--------------------------------
"Beware of bugs in the above code; I have only proved it correct,
not tried it."                                    -- Donald Knuth

