Mercurial > hg > xemacs-beta
diff lisp/build-report.el @ 4021:cef5f57bb9e2
[xemacs-hg @ 2007-06-21 13:39:08 by aidan]
'(lambda ...) -> #'(lambda ...), for the sake of style and the byte
compiler.
| author | aidan |
|---|---|
| date | Thu, 21 Jun 2007 13:39:36 +0000 |
| parents | b34066456742 |
| children | eb82fbb675ea |
line wrap: on
line diff
--- a/lisp/build-report.el Wed Jun 20 21:51:09 2007 +0000 +++ b/lisp/build-report.el Thu Jun 21 13:39:36 2007 +0000 @@ -3,8 +3,8 @@ ;; Copyright (C) 1997-2003 Adrian Aichner ;; Author: Adrian Aichner <adrian@xemacs.org> -;; Date: $Date: 2005/10/21 10:34:35 $ -;; Version: $Revision: 1.14 $ +;; Date: $Date: 2007/06/21 13:39:10 $ +;; Version: $Revision: 1.15 $ ;; Keywords: internal ;; This file is part of XEmacs. @@ -520,7 +520,7 @@ "Concatenate elements of `build-report-delete-regexp' and a general MIME tag REGEXP. The result is a REGEXP string matching either of the REGEXPs in `build-report-delete-regexp' or a general MIME tag REGEXP." - (mapconcat '(lambda (item) item) + (mapconcat #'identity build-report-delete-regexp "\\|")) (defun build-report-installation-data (&optional file)