[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/scad-mode d862a9ad8a 3/3: Accept prefix arguments
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/scad-mode d862a9ad8a 3/3: Accept prefix arguments |
Date: |
Sun, 13 Nov 2022 12:59:21 -0500 (EST) |
branch: elpa/scad-mode
commit d862a9ad8a570703709d096478494b6705d33ad0
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
Accept prefix arguments
---
scad-mode.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/scad-mode.el b/scad-mode.el
index 73a97fdb8f..c696cb5316 100644
--- a/scad-mode.el
+++ b/scad-mode.el
@@ -408,8 +408,9 @@ Key bindings:
"Define camera move function NAME which increments IDX by OFF."
`(defun ,(intern (format "scad-preview-%s" name)) (&optional offset)
"Move camera by OFFSET."
- (interactive)
- (cl-incf (nth ,idx scad-preview-camera) (or offset ,off))
+ (interactive "p")
+ (cl-incf (nth ,idx scad-preview-camera)
+ (* (cl-signum ,off) (or offset ,(abs off))))
(scad--preview-render)))
(scad--define-preview-move translate-x+ 0 10)