# HG changeset patch
# User Aidan Kehoe <kehoea@parhasard.net>
# Date 1263048913 0
# Node ID 0142cb4d104942692bdae97570dde1227a4195f3
# Parent  576f09d387d55fd474a766b698100521fbfa3fd8
Fix a bug I introduced in #'with-trapping-errors.

2010-01-09  Aidan Kehoe  <kehoea@parhasard.net>

	* subr.el (with-trapping-errors):
	Fix a bug here, where I used a normal quote instead of a
	backquote. Thank you the byte-compiler.

diff -r 576f09d387d5 -r 0142cb4d1049 lisp/ChangeLog
--- a/lisp/ChangeLog	Sat Jan 09 15:49:38 2010 +0100
+++ b/lisp/ChangeLog	Sat Jan 09 14:55:13 2010 +0000
@@ -1,3 +1,9 @@
+2010-01-09  Aidan Kehoe  <kehoea@parhasard.net>
+
+	* subr.el (with-trapping-errors): 
+	Fix a bug here, where I used a normal quote instead of a
+	backquote. Thank you the byte-compiler.
+
 2010-01-08  Aidan Kehoe  <kehoea@parhasard.net>
 
 	* indent.el (indent-region):
diff -r 576f09d387d5 -r 0142cb4d1049 lisp/subr.el
--- a/lisp/subr.el	Sat Jan 09 15:49:38 2010 +0100
+++ b/lisp/subr.el	Sat Jan 09 14:55:13 2010 +0000
@@ -1509,7 +1509,7 @@
 		 (progn ,@keys-body)))
        (error
 	,error-form
-	,@(if resignal '((signal (car ,cte-cc-var) (cdr ,cte-cc-var)))))
+	,@(if resignal `((signal (car ,cte-cc-var) (cdr ,cte-cc-var)))))
        )))
 
 ;;;; Miscellanea.