Mercurial > hg > xemacs-beta
comparison 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 |
comparison
equal
deleted
inserted
replaced
4020:77df2f1e36fd | 4021:cef5f57bb9e2 |
---|---|
1 ;;; build-report.el --- Automatically formatted build reports for XEmacs | 1 ;;; build-report.el --- Automatically formatted build reports for XEmacs |
2 | 2 |
3 ;; Copyright (C) 1997-2003 Adrian Aichner | 3 ;; Copyright (C) 1997-2003 Adrian Aichner |
4 | 4 |
5 ;; Author: Adrian Aichner <adrian@xemacs.org> | 5 ;; Author: Adrian Aichner <adrian@xemacs.org> |
6 ;; Date: $Date: 2005/10/21 10:34:35 $ | 6 ;; Date: $Date: 2007/06/21 13:39:10 $ |
7 ;; Version: $Revision: 1.14 $ | 7 ;; Version: $Revision: 1.15 $ |
8 ;; Keywords: internal | 8 ;; Keywords: internal |
9 | 9 |
10 ;; This file is part of XEmacs. | 10 ;; This file is part of XEmacs. |
11 | 11 |
12 ;; XEmacs is free software; you can redistribute it and/or modify | 12 ;; XEmacs is free software; you can redistribute it and/or modify |
518 | 518 |
519 (defun build-report-delete () | 519 (defun build-report-delete () |
520 "Concatenate elements of `build-report-delete-regexp' and a general | 520 "Concatenate elements of `build-report-delete-regexp' and a general |
521 MIME tag REGEXP. The result is a REGEXP string matching either of the | 521 MIME tag REGEXP. The result is a REGEXP string matching either of the |
522 REGEXPs in `build-report-delete-regexp' or a general MIME tag REGEXP." | 522 REGEXPs in `build-report-delete-regexp' or a general MIME tag REGEXP." |
523 (mapconcat '(lambda (item) item) | 523 (mapconcat #'identity |
524 build-report-delete-regexp "\\|")) | 524 build-report-delete-regexp "\\|")) |
525 | 525 |
526 (defun build-report-installation-data (&optional file) | 526 (defun build-report-installation-data (&optional file) |
527 "Return a list of XEmacs installation data containing MAJOR_NUMBER | 527 "Return a list of XEmacs installation data containing MAJOR_NUMBER |
528 MINOR_NUMBER BETA_STRING CODENAME CONFIGURATION SRCDIR from FILE, | 528 MINOR_NUMBER BETA_STRING CODENAME CONFIGURATION SRCDIR from FILE, |