[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/scad-mode c09d8f97e8 21/47: Automatic refresh can be disab
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/scad-mode c09d8f97e8 21/47: Automatic refresh can be disabled |
Date: |
Sat, 12 Nov 2022 13:59:35 -0500 (EST) |
branch: elpa/scad-mode
commit c09d8f97e88d053061c5d75a9059d011b8ac79ab
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
Automatic refresh can be disabled
---
scad-mode.el | 13 +++++++------
1 file changed, 7 insertions(+), 6 deletions(-)
diff --git a/scad-mode.el b/scad-mode.el
index d7ddc5a1f6..91dc1b2c2d 100644
--- a/scad-mode.el
+++ b/scad-mode.el
@@ -116,9 +116,9 @@
(defcustom scad-preview-refresh 1.0
"Delay in seconds until updating preview."
- :type 'number)
+ :type '(choice (const nil) number))
-(defcustom scad-preview-size '(600 . 600)
+(defcustom scad-preview-size '(800 . 800)
"Size of preview image."
:type '(cons integer integer))
@@ -245,7 +245,7 @@ Key bindings:
(put 'scad--preview-status 'permanent-local t)
(put 'scad--preview-timer 'permanent-local t)
-(defvar scad-preview-mode-map
+(defvar scad-image-mode-map
(let ((map (make-sparse-keymap)))
(define-key map (kbd "M--") #'scad-preview-size-)
(define-key map (kbd "M-+") #'scad-preview-size+)
@@ -276,7 +276,8 @@ Key bindings:
(setq scad--preview-buffer (if (buffer-live-p scad--preview-buffer)
scad--preview-buffer
(generate-new-buffer (format "*scad preview:
%s*" (buffer-name)))))
- (add-hook 'after-change-functions #'scad--preview-change nil 'local)
+ (when scad-preview-refresh
+ (add-hook 'after-change-functions #'scad--preview-change nil 'local))
(display-buffer scad--preview-buffer)
(let ((orig-buffer (current-buffer)))
(with-current-buffer scad--preview-buffer
@@ -329,7 +330,7 @@ Key bindings:
(insert-file-contents outfile)
(let ((inhibit-message t)
(message-log-max nil))
- (scad-preview-mode))
+ (scad-image-mode))
(scad--preview-status))))
(delete-file outfile)
(delete-file infile))
@@ -353,7 +354,7 @@ Key bindings:
(cancel-timer scad--preview-timer)
(setq scad--preview-timer nil)))
-(define-derived-mode scad-preview-mode image-mode "SCADPreview"
+(define-derived-mode scad-image-mode image-mode "SCAD Preview"
"Major mode for SCAD preview buffers."
(setq mode-line-format '("" mode-line-buffer-identification (" "
scad--preview-status))
revert-buffer-function #'scad--preview-reset))
- [nongnu] elpa/scad-mode f18fb5082d 13/47: Update package header and commentary, (continued)
- [nongnu] elpa/scad-mode f18fb5082d 13/47: Update package header and commentary, ELPA Syncer, 2022/11/12
- [nongnu] elpa/scad-mode 0cb891b232 18/47: Update commentary, ELPA Syncer, 2022/11/12
- [nongnu] elpa/scad-mode b038c79b40 19/47: Rebind keys to support tab completion, ELPA Syncer, 2022/11/12
- [nongnu] elpa/scad-mode 4bf29ec9b1 20/47: Add preview, ELPA Syncer, 2022/11/12
- [nongnu] elpa/scad-mode 9c9bb9b5aa 01/47: Initial commit, ELPA Syncer, 2022/11/12
- [nongnu] elpa/scad-mode fece897e58 04/47: Delete trailing whitespace, ELPA Syncer, 2022/11/12
- [nongnu] elpa/scad-mode 25f94cc800 03/47: Require Emacs 26, ELPA Syncer, 2022/11/12
- [nongnu] elpa/scad-mode 53aba7b6e9 09/47: Fix and simplify completion-at-point-function, ELPA Syncer, 2022/11/12
- [nongnu] elpa/scad-mode 358573e7aa 12/47: Add basic README, ELPA Syncer, 2022/11/12
- [nongnu] elpa/scad-mode fff66878d5 17/47: Cleanup hook handling, ELPA Syncer, 2022/11/12
- [nongnu] elpa/scad-mode c09d8f97e8 21/47: Automatic refresh can be disabled,
ELPA Syncer <=
- [nongnu] elpa/scad-mode d39d19f64f 24/47: Save before opening/exporting, ELPA Syncer, 2022/11/12
- [nongnu] elpa/scad-mode 56a3af8661 37/47: Update keywords, ELPA Syncer, 2022/11/12
- [nongnu] elpa/scad-mode 710cf2b7ce 45/47: Rename preview output buffer, ELPA Syncer, 2022/11/12
- [nongnu] elpa/scad-mode 3609ca3ee1 29/47: Use setq-local, ELPA Syncer, 2022/11/12
- [nongnu] elpa/scad-mode 30e523aa68 05/47: Don't mention Marmalade, ELPA Syncer, 2022/11/12
- [nongnu] elpa/scad-mode 012e753485 14/47: README: Fix language keyword, ELPA Syncer, 2022/11/12
- [nongnu] elpa/scad-mode 230302d875 22/47: Update authors, ELPA Syncer, 2022/11/12
- [nongnu] elpa/scad-mode ad1254a3de 27/47: Add scad-preview-view, ELPA Syncer, 2022/11/12
- [nongnu] elpa/scad-mode ec9bf4c643 30/47: Larger preview image, ELPA Syncer, 2022/11/12
- [nongnu] elpa/scad-mode 61f306462a 36/47: Version 93.0, ELPA Syncer, 2022/11/12