changeset 20797:5941b5298627

(report-emacs-bug-address): Variable renamed from bug-gnu-emacs. Use defcustom. (report-emacs-bug-pretest-address): Use defcustom.
author Richard M. Stallman <rms@gnu.org>
date Wed, 28 Jan 1998 21:02:35 +0000
parents 2d662878358c
children 25b0721fc2fc
files lisp/mail/emacsbug.el
diffstat 1 files changed, 9 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/emacsbug.el	Wed Jan 28 18:01:29 1998 +0000
+++ b/lisp/mail/emacsbug.el	Wed Jan 28 21:02:35 1998 +0000
@@ -42,11 +42,15 @@
   :group 'maint
   :group 'mail)
 
-(defvar bug-gnu-emacs "bug-gnu-emacs@prep.ai.mit.edu"
-  "Address of mailing list for GNU Emacs bugs.")
+(defcustom report-emacs-bug-address "bug-gnu-emacs@prep.ai.mit.edu"
+  "*Address of mailing list for GNU Emacs bugs."
+  :group 'emacsbug
+  :type 'string)
 
-(defvar report-emacs-bug-pretest-address "emacs-pretest-bug@gnu.ai.mit.edu"
-  "Address of mailing list for GNU Emacs pretest bugs.")
+(defcustom report-emacs-bug-pretest-address "emacs-pretest-bug@gnu.ai.mit.edu"
+  "*Address of mailing list for GNU Emacs pretest bugs."
+  :group 'emacsbug
+  :type 'string)
 
 (defvar report-emacs-bug-orig-text nil
   "The automatically-created initial text of bug report.")
@@ -76,7 +80,7 @@
 		      ;; If there are four numbers in emacs-version,
 		      ;; this is a pretest version.
 		      report-emacs-bug-pretest-address
-		    bug-gnu-emacs)
+		    report-emacs-bug-address)
 		  topic)
     ;; The rest of this does not execute
     ;; if the user was asked to confirm and said no.