>>612
あー俺も同じことやってる

(defun toggle-tab-width ()
 (interactive)
 (if (= tab-width 8)
   (setq tab-width 4)
  (setq tab-width 8))
 (message (format "tab-width: %d" tab-width))
 (redraw-display))