|
|
1.1 root 1: ;; Command to report Emacs bugs to appropriate mailing list.
2: ;; Not fully installed because it can work only on Internet hosts.
3: ;; Copyright (C) 1985 Free Software Foundation, Inc.
4: ;; Principal author K. Shane Hartman
5:
6: ;; This file is part of GNU Emacs.
7:
8: ;; GNU Emacs is distributed in the hope that it will be useful,
9: ;; but WITHOUT ANY WARRANTY. No author or distributor
10: ;; accepts responsibility to anyone for the consequences of using it
11: ;; or for whether it serves any particular purpose or works at all,
12: ;; unless he says so in writing. Refer to the GNU Emacs General Public
13: ;; License for full details.
14:
15: ;; Everyone is granted permission to copy, modify and redistribute
16: ;; GNU Emacs, but only under the conditions described in the
17: ;; GNU Emacs General Public License. A copy of this license is
18: ;; supposed to have been given to you along with GNU Emacs so you
19: ;; can know your rights and responsibilities. It should be in a
20: ;; file named COPYING. Among other things, the copyright notice
21: ;; and this notice must be preserved on all copies.
22:
23:
24: ;; >> This should be an address which is accessible to your machine,
25: ;; >> otherwise you can't use this file. It will only work on the
26: ;; >> internet with this address.
27:
28: (defvar bug-gnu-emacs "[email protected]"
29: "Address of site maintaining mailing list for Gnu emacs bugs.")
30:
31: (defun report-emacs-bug (topic)
32: "Report a bug in Gnu emacs.
33: Prompts for bug subject. Leaves you in a mail buffer."
34: (interactive "sBug Subject: ")
35: (mail nil bug-gnu-emacs topic)
36: (goto-char (point-max))
37: (insert "\nIn " (emacs-version) "\n\n")
38: (message (substitute-command-keys "Type \\[mail-send] to send bug report.")))
39:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.