diff options
| author | Jay Belanger | 2008-08-14 18:34:05 +0000 |
|---|---|---|
| committer | Jay Belanger | 2008-08-14 18:34:05 +0000 |
| commit | 77ba6df41b2d541c2088b4239fe2e7ca73a7a87a (patch) | |
| tree | 8433dc376937de51c67168860377cfbe90188931 | |
| parent | 768ae6f240393a26e61f8292c144bfd54cf2ed24 (diff) | |
| download | emacs-77ba6df41b2d541c2088b4239fe2e7ca73a7a87a.tar.gz emacs-77ba6df41b2d541c2088b4239fe2e7ca73a7a87a.zip | |
(report-calc-bug): Remove version number.
calc-stuff (calc-version): Remove function.
calc.el (calc-version): Remove.
| -rw-r--r-- | lisp/calc/calc-misc.el | 12 |
1 files changed, 5 insertions, 7 deletions
diff --git a/lisp/calc/calc-misc.el b/lisp/calc/calc-misc.el index 6aaf0095419..350e46960bd 100644 --- a/lisp/calc/calc-misc.el +++ b/lisp/calc/calc-misc.el | |||
| @@ -216,7 +216,7 @@ Calc user interface as before (either C-x * C or C-x * K; initially C-x * C). | |||
| 216 | ;;;###autoload | 216 | ;;;###autoload |
| 217 | (defun calc-help () | 217 | (defun calc-help () |
| 218 | (interactive) | 218 | (interactive) |
| 219 | (let ((msgs (append | 219 | (let ((msgs |
| 220 | '("Press `h' for complete help; press `?' repeatedly for a summary" | 220 | '("Press `h' for complete help; press `?' repeatedly for a summary" |
| 221 | "Letter keys: Negate; Precision; Yank; Why; Xtended cmd; Quit" | 221 | "Letter keys: Negate; Precision; Yank; Why; Xtended cmd; Quit" |
| 222 | "Letter keys: SHIFT + Undo, reDo; Keep-args; Inverse, Hyperbolic" | 222 | "Letter keys: SHIFT + Undo, reDo; Keep-args; Inverse, Hyperbolic" |
| @@ -235,10 +235,8 @@ Calc user interface as before (either C-x * C or C-x * K; initially C-x * C). | |||
| 235 | "Prefix keys: Kombinatorics/statistics, Modes, Store/recall" | 235 | "Prefix keys: Kombinatorics/statistics, Modes, Store/recall" |
| 236 | "Prefix keys: Trail/time, Units/statistics, Vector/matrix" | 236 | "Prefix keys: Trail/time, Units/statistics, Vector/matrix" |
| 237 | "Prefix keys: Z (user), SHIFT + Z (define)" | 237 | "Prefix keys: Z (user), SHIFT + Z (define)" |
| 238 | "Prefix keys: prefix + ? gives further help for that prefix") | 238 | "Prefix keys: prefix + ? gives further help for that prefix" |
| 239 | (list (format | 239 | " Calc by Dave Gillespie, daveg@synaptics.com"))) |
| 240 | " Calc %s by Dave Gillespie, daveg@synaptics.com" | ||
| 241 | calc-version))))) | ||
| 242 | (if calc-full-help-flag | 240 | (if calc-full-help-flag |
| 243 | msgs | 241 | msgs |
| 244 | (if (or calc-inverse-flag calc-hyperbolic-flag) | 242 | (if (or calc-inverse-flag calc-hyperbolic-flag) |
| @@ -834,8 +832,8 @@ loaded and the keystroke automatically re-typed." | |||
| 834 | Prompts for bug subject. Leaves you in a mail buffer." | 832 | Prompts for bug subject. Leaves you in a mail buffer." |
| 835 | (interactive) | 833 | (interactive) |
| 836 | (let ((reporter-prompt-for-summary-p t)) | 834 | (let ((reporter-prompt-for-summary-p t)) |
| 837 | (reporter-submit-bug-report calc-bug-address "Calc" '(calc-version) | 835 | (reporter-submit-bug-report calc-bug-address "Calc" |
| 838 | nil nil | 836 | nil nil nil |
| 839 | "Please describe exactly what actions triggered the bug and the | 837 | "Please describe exactly what actions triggered the bug and the |
| 840 | precise symptoms of the bug. If possible, include a backtrace by | 838 | precise symptoms of the bug. If possible, include a backtrace by |
| 841 | doing 'M-x toggle-debug-on-error', then reproducing the bug. | 839 | doing 'M-x toggle-debug-on-error', then reproducing the bug. |