Mercurial > hg > xemacs-beta

diff lisp/test-harness.el @ 5292:e4305eb6fb8c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge some permissions corrections to trunk.
author Stephen J. Turnbull <stephen@xemacs.org>
date Mon, 18 Oct 2010 23:21:23 +0900
parents ecdd1daab447
children f00192e1cd49 308d34e9f07d
line wrap: on
line diff
--- a/lisp/test-harness.el	Mon Oct 18 23:03:27 2010 +0900
+++ b/lisp/test-harness.el	Mon Oct 18 23:21:23 2010 +0900
@@ -502,7 +502,7 @@
 			       `(quote ,(car body))
 			     `(quote (progn ,@body)))))
 	  `(Skip-Test-Unless (fboundp 'defadvice) "can't defadvice"
-	    expected-message-regexp
+	    ,expected-message-regexp
 	    (let ((messages ""))
 	      (defadvice message (around collect activate)
 		(defvar messages)