Mercurial > hg > xemacs-beta
comparison lisp/build-report.el @ 462:0784d089fdc9 r21-2-46
Import from CVS: tag r21-2-46
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:44:37 +0200 |
parents | 223736d75acb |
children | 5aa1854ad537 |
comparison
equal
deleted
inserted
replaced
461:120ed4009e51 | 462:0784d089fdc9 |
---|---|
2 | 2 |
3 ;; Copyright (C) 1997 Adrian Aichner | 3 ;; Copyright (C) 1997 Adrian Aichner |
4 | 4 |
5 ;; Author: Adrian Aichner <adrian@xemacs.org> | 5 ;; Author: Adrian Aichner <adrian@xemacs.org> |
6 ;; Date: Sun., Apr. 20, 1997-2000. | 6 ;; Date: Sun., Apr. 20, 1997-2000. |
7 ;; Version: $Revision: 1.5.2.7 $ | 7 ;; Version: $Revision: 1.5.2.9 $ |
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 |
269 (file-name-as-directory build-report-make-output-dir)))) | 269 (file-name-as-directory build-report-make-output-dir)))) |
270 build-report-make-output-files))) | 270 build-report-make-output-files))) |
271 | 271 |
272 ;;;###autoload | 272 ;;;###autoload |
273 (defun build-report (&rest args) | 273 (defun build-report (&rest args) |
274 "Composes a fresh mail message with the contents of the built XEmacs | 274 "Report build information including Installation and make output. |
275 Installation file and excerpts from XEmacs make output. | 275 |
276 `compose-mail' is used to create the mail message. Point is left at | 276 Prompts for status (usually \"Success\" or \"Failure\"). Then uses |
277 the beginning of the mail text. You may add some personal notes if | 277 `compose-mail' to create a mail message. The Subject header contains |
278 you like and send the report. | 278 status and version information. Point is left at the beginning of the |
279 See also | 279 mail text. Add some notes if you like, and send the report. |
280 `compose-mail', `mail-user-agent', | 280 |
281 `build-report-destination', | 281 Looks for Installation and the make output file (`beta.err' by |
282 `build-report-keep-regexp', | 282 default, customizable via `build-report-make-output-files') in the |
283 `build-report-delete-regexp', | 283 build directory of the running XEmacs by default (customizable via |
284 `build-report-make-output-dir', | 284 `build-report-make-output-dir'). The output from make is filtered |
285 `build-report-make-output-files', and | 285 through `build-report-keep-regexp' and `build-report-delete-regexp' |
286 `build-report-installation-file'." | 286 before including in the message. |
287 | |
288 See also `mail-user-agent', `build-report-destination', and | |
289 `build-report-installation-file'." | |
287 ;; `interactive' form returns value for formal parameter `args'. | 290 ;; `interactive' form returns value for formal parameter `args'. |
288 (interactive | 291 (interactive |
289 (let (prompt | 292 (let (prompt |
290 hist | 293 hist |
291 arg | 294 arg |