Emacs: 智能感知和操作光标处的语法对象

Emacs-Lisp
63 
(global-set-key (kbd "C-c C-t")
                (defun toggle-thing-edit-map ()
                  (interactive)
                  (unless (boundp 'old-local-map)
                    (setq-local old-local-map (current-local-map)))
                  (use-local-map
                   (if (equal old-local-map
                              (current-local-map))
                       peng-thing-edit-map
                     old-local-map))))