EMACS下存盘时自动转换TAB，去除多余空格（小技巧）
发表于 ： 2007-11-29 20:09
这个对我很有用，不知对大家是否有用。粘贴到你的~/.emac文件即可。
代码： 全选
;; Add save buffer hook
(defun reed_update_file()
"Convert spaces to tabs, and remove useless spaces"
(interactive)
;; Remove useless spaces
(edit-picture)
(picture-mode-exit)
;; Convert spaces to tabs
(tabify (point-min) (point-max))
;; Save buffer
;;(basic-save-buffer)
)
;; Add-hook to automate the task when we save files
(add-hook 'write-file-hooks 'reed_update_file)