mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-25 10:47:00 +00:00
Code Issues Releases Activity

Calc: fix autoload errors (bug#40800)

Browse Source 
Reported by Hugo Daschbach.

* lisp/calc/calc-ext.el (calc-init-extensions):
Remove calc-kbd-report key binding and autoload; it was removed in 2005.
calc-keypad-x-{left,right,middle}-click were renamed to
calc-keypad-{left,right,middle}-click in 2001; fix the autoloads.
calc-twos-complement-mode is a variable, not a function; remove the
autoload.
* lisp/calc/calc-prog.el: Remove commented-out calc-kbd-report.
This commit is contained in:
Mattias Engdegård 2020-04-24 12:49:42 +02:00
parent 369761b36d
commit f7e488d206
2 changed files with 4 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
lisp/calc/calc-ext.el
View File

@ -674,7 +674,6 @@
(define-key calc-mode-map "Z/" 'calc-kbd-break)
(define-key calc-mode-map "Z`" 'calc-kbd-push)
(define-key calc-mode-map "Z'" 'calc-kbd-pop)
(define-key calc-mode-map "Z=" 'calc-kbd-report)
(define-key calc-mode-map "Z#" 'calc-kbd-query)
(calc-init-prefixes)
@ -845,8 +844,8 @@ math-bernoulli-number math-gammap1-raw)
("calc-incom" calc-digit-dots)
("calc-keypd" calc-do-keypad
calc-keypad-x-left-click calc-keypad-x-middle-click
calc-keypad-x-right-click)
calc-keypad-left-click calc-keypad-middle-click
calc-keypad-right-click)
("calc-lang" calc-set-language
math-read-big-balance math-read-big-rec)
@ -1003,7 +1002,7 @@ calc-find-root calc-poly-interp)
calc-floor calc-idiv calc-increment calc-mant-part calc-max calc-min
calc-round calc-scale-float calc-sign calc-trunc calc-xpon-part)
("calc-bin" calc-and calc-binary-radix calc-clip calc-twos-complement-mode
("calc-bin" calc-and calc-binary-radix calc-clip
calc-decimal-radix calc-diff calc-hex-radix calc-leading-zeros
calc-lshift-arith calc-lshift-binary calc-not calc-octal-radix calc-or calc-radix
calc-rotate-binary calc-rshift-arith calc-rshift-binary calc-word-size
@ -1116,7 +1115,7 @@ calc-equal-to calc-get-user-defn calc-greater-equal calc-greater-than
calc-in-set calc-kbd-break calc-kbd-else calc-kbd-else-if
calc-kbd-end-for calc-kbd-end-if calc-kbd-end-loop calc-kbd-end-repeat
calc-kbd-for calc-kbd-if calc-kbd-loop calc-kbd-pop calc-kbd-push
calc-kbd-query calc-kbd-repeat calc-kbd-report calc-less-equal
calc-kbd-query calc-kbd-repeat calc-less-equal
calc-less-than calc-logical-and calc-logical-if calc-logical-not
calc-logical-or calc-not-equal-to calc-pass-errors calc-remove-equal
calc-timing calc-user-define calc-user-define-composition

5
lisp/calc/calc-prog.el
View File

@ -1452,11 +1452,6 @@ Redefine the corresponding command."
(error "%s" "Unbalanced Z' in keyboard macro")))
;; (defun calc-kbd-report (msg)
;; (interactive "sMessage: ")
;; (calc-wrapper
;; (math-working msg (calc-top-n 1))))
(defun calc-kbd-query ()
(interactive)
(let ((defining-kbd-macro nil)