Mercurial > emacs
changeset 24771:0b882049980c
(crisp-submit-bug-report): Function deleted. Binding deleted also.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 24 May 1999 22:25:57 +0000 |
| parents | c9cc4db4508f |
| children | 2c99e81da802 |
| files | lisp/emulation/crisp.el |
| diffstat | 1 files changed, 1 insertions(+), 23 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emulation/crisp.el Mon May 24 22:23:35 1999 +0000 +++ b/lisp/emulation/crisp.el Mon May 24 22:25:57 1999 +0000 @@ -3,6 +3,7 @@ ;; Copyright (C) 1997, 1998, 1999 Free Software Foundation, Inc. ;; Author: Gary D. Foster <gfoster@suzieq.ml.org> +;; Maintainer: FSF (unless Foster can be recontacted) ;; Keywords: emulations brief crisp ;; This file is part of GNU Emacs. @@ -265,8 +266,6 @@ (move-to-window-line -1))) (define-key crisp-mode-map [(meta end)] 'end-of-line) -(define-key crisp-mode-map [(control c) (b)] 'crisp-submit-bug-report) - (defun crisp-version (&optional arg) "Version number of the CRiSP emulator package. If ARG, insert results at point." @@ -359,27 +358,6 @@ (save-buffers-kill-emacs) (call-interactively 'execute-extended-command))) -;; bug reporter - -(defun crisp-submit-bug-report () - "Submit via mail a bug report on CRiSP Mode." - (interactive) - ;; load in reporter - (let ((reporter-prompt-for-summary-p t) - (reporter-dont-compact-list '(c-offsets-alist))) - (and - (if (y-or-n-p "Do you want to submit a report on CRiSP Mode? ") - t (message "") nil) - (require 'reporter) - (reporter-submit-bug-report - crisp-mode-help-address - (concat "CRiSP Mode [" crisp-version "]") - nil - nil - nil - "Dear Gary," - )))) - ;; Now enable the mode ;;;###autoload