(report-calc-bug): Use reporter.el.

[bpt/emacs.git] / lisp / calc / calc-misc.el

diff --git a/lisp/calc/calc-misc.el b/lisp/calc/calc-misc.el
index 08ca3fe..c9819d1 100644 (file)
--- a/lisp/calc/calc-misc.el
+++ b/lisp/calc/calc-misc.el
@@ -797,19 +797,18 @@ loaded and the keystroke automatically re-typed."
       nil)))
 
 
-
-
-
 ;;; Bug reporting
 
 (defun report-calc-bug (topic)
   "Report a bug in Calc, the GNU Emacs calculator.
 Prompts for bug subject.  Leaves you in a mail buffer."
   (interactive "sBug Subject: ")
-  (mail nil calc-bug-address topic)
-  (goto-char (point-max))
-  (insert "\nIn Calc " calc-version ", Emacs " (emacs-version) "\n\n")
-  (message (substitute-command-keys "Type \\[mail-send] to send bug report")))
+  (reporter-submit-bug-report calc-bug-address "Calc" '(calc-version)
+                             nil nil
+"Please describe exactly what actions triggered the bug and the
+precise symptoms of the bug.  If possible, include a backtrace by
+doing 'M-x toggle-debug-on-error', then reproducing the bug.
+" ))
 (defalias 'calc-report-bug 'report-calc-bug)
 
 ;;; calc-misc.el ends here