sjs/config
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

tweak auto-revert-mode and remove revert-buffer-without-confirmation function

Browse source
This commit is contained in:
Sami Samhuri 2010-05-26 23:27:21 -07:00
parent c57b901c21
commit a48cca1b72
1 changed files with 3 additions and 13 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
emacs
View file

@ -26,8 +26,11 @@
(setq inhibit-startup-message t)
(setq make-backup-files nil)
(global-subword-mode 1)
(setq auto-revert-interval 2)
(global-auto-revert-mode)
;; map cmd to meta (Emacs.app 23.2)
(when macosx-p
(setq mac-option-key-is-meta nil)
@ -327,7 +330,6 @@
(global-set-key "\C-zm" 'minimap-create)
(global-set-key "\C-zM" 'minimap-kill)
(global-set-key "\C-zr" 'query-replace-regexp)
(global-set-key "\C-zR" 'revert-buffer-without-confirmation)
(global-set-key "\C-zs" 'run-scheme)
(global-set-key "\C-zt" 'tagify-region-or-insert-tag)
(global-set-key "\C-zz" 'shell) ; z for zsh
@ -351,18 +353,6 @@
;; utilities & customizations
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; now, how can I call this automatically when a file is changed out
;; from under a buffer? (like textmate)
(defun revert-buffer-without-confirmation (&optional prefix)
"If the current buffer has no unsaved changes, revert it
without confirmation, and ignoring auto-save files. If there
are unsaved changes then revert with confirmation."
(interactive "P")
(let ((no-confirm (or prefix
(not (buffer-modified-p)))))
(revert-buffer t no-confirm)
(when no-confirm (message (concat "Reverted " (buffer-name))))))
(defun duplicate-line (&optional arg)
"Duplicate the current line."
(interactive "p")