[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 10d2b76edad 2/4: * lisp/calc/calc.el (calcDigit-backspace): Hush
From: |
Mattias Engdegård |
Subject: |
master 10d2b76edad 2/4: * lisp/calc/calc.el (calcDigit-backspace): Hush warning. |
Date: |
Mon, 27 Feb 2023 09:21:59 -0500 (EST) |
branch: master
commit 10d2b76edadb6575545433ea6183c4d8e8588191
Author: Mattias Engdegård <mattiase@acm.org>
Commit: Mattias Engdegård <mattiase@acm.org>
* lisp/calc/calc.el (calcDigit-backspace): Hush warning.
---
lisp/calc/calc.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el
index 1da4f9ad738..a1545edba19 100644
--- a/lisp/calc/calc.el
+++ b/lisp/calc/calc.el
@@ -2482,7 +2482,8 @@ the United States."
(interactive)
(cond ((eq last-command 'calcDigit-start)
(erase-buffer))
- (t (backward-delete-char 1)))
+ (t (with-suppressed-warnings ((interactive-only backward-delete-char))
+ (backward-delete-char 1))))
(if (= (calc-minibuffer-size) 0)
(progn
(setq last-command-event 13)