branch: elpa/scad-mode
commit aa2e76a29bb88790c351c5c32bec058d61cd7908
Author: Daniel Mendler <[email protected]>
Commit: Daniel Mendler <[email protected]>

    Rename mode back
---
 scad-mode.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/scad-mode.el b/scad-mode.el
index caa2987764..7f0d37ae75 100644
--- a/scad-mode.el
+++ b/scad-mode.el
@@ -245,7 +245,7 @@ Key bindings:
 (put 'scad--preview-status  'permanent-local t)
 (put 'scad--preview-timer   'permanent-local t)
 
-(defvar scad-image-mode-map
+(defvar scad-preview-mode-map
   (let ((map (make-sparse-keymap)))
     (define-key map (kbd "M--") #'scad-preview-size-)
     (define-key map (kbd "M-+") #'scad-preview-size+)
@@ -330,7 +330,7 @@ Key bindings:
                                (insert-file-contents outfile)
                                (let ((inhibit-message t)
                                      (message-log-max nil))
-                                 (scad-image-mode))
+                                 (scad-preview-mode))
                                (scad--preview-status))))
                          (delete-file outfile)
                          (delete-file infile))
@@ -354,7 +354,7 @@ Key bindings:
     (cancel-timer scad--preview-timer)
     (setq scad--preview-timer nil)))
 
-(define-derived-mode scad-image-mode image-mode "SCAD Preview"
+(define-derived-mode scad-preview-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))

Reply via email to