disable message output in gered/enable-tabs and gered/disable-tabs
This commit is contained in:
parent
19504c074e
commit
1475c21715
|
@ -68,14 +68,14 @@
|
||||||
|
|
||||||
(defun gered/enable-tabs ()
|
(defun gered/enable-tabs ()
|
||||||
(interactive)
|
(interactive)
|
||||||
(message "gered/enable-tabs for %s" (buffer-name))
|
;(message "gered/enable-tabs for %s" (buffer-name))
|
||||||
(local-set-key (kbd "TAB") 'tab-to-tab-stop)
|
(local-set-key (kbd "TAB") 'tab-to-tab-stop)
|
||||||
(setq-local tab-width my-preferred-tab-width)
|
(setq-local tab-width my-preferred-tab-width)
|
||||||
(setq-local indent-tabs-mode t))
|
(setq-local indent-tabs-mode t))
|
||||||
|
|
||||||
(defun gered/disable-tabs (&optional override-tab-width)
|
(defun gered/disable-tabs (&optional override-tab-width)
|
||||||
(interactive)
|
(interactive)
|
||||||
(message "gered/disable-tabs for %s" (buffer-name))
|
;(message "gered/disable-tabs for %s" (buffer-name))
|
||||||
(local-set-key (kbd "TAB") 'tab-to-tab-stop)
|
(local-set-key (kbd "TAB") 'tab-to-tab-stop)
|
||||||
(setq-local tab-width (or override-tab-width my-preferred-tab-width))
|
(setq-local tab-width (or override-tab-width my-preferred-tab-width))
|
||||||
(setq-local indent-tabs-mode nil))
|
(setq-local indent-tabs-mode nil))
|
||||||
|
|
Loading…
Reference in a new issue