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

save the pinky even more

Browse source
This commit is contained in:
Sami Samhuri 2010-05-31 17:51:07 -07:00
parent a176dc7746
commit ab06d91199
1 changed files with 12 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

18
emacs
View file

@ -338,8 +338,8 @@
(global-set-key "\C-z\C-t" 'totd)
;; extend Emacs' default key binding space
(global-set-key "\C-x\C-b" 'bs-show) ; use the buffer list buffer menu
(global-set-key "\C-x\C-r" 'recentf-find-files-compl)
(global-set-key [(super b)] 'bs-show) ; use the buffer list buffer menu
(global-set-key "\C-x\C-r" 'recentf-find-files-compl) ; unused, remove?
;; use the X clipboard for cut/copy/paste
(global-set-key "\C-w" 'clipboard-kill-region)
@ -353,10 +353,16 @@
(global-set-key "\M-B" 'select-enclosing-pair)
;; nice OS X keyboard behaviors that save my pinky too
(global-unset-key "\C-_")
(global-unset-key "\C-x\C-f")
(global-unset-key "\C-xo")
(global-unset-key "\C-x\C-s")
(defun save-the-pinky-buffer () (interactive) (message "Save your pinky! Use s-b (Opt-b) instead."))
(defun save-the-pinky-open () (interactive) (message "Save your pinky! Use M-z (Cmd-o) instead."))
(defun save-the-pinky-save () (interactive) (message "Save your pinky! Use M-z (Cmd-s) instead."))
(defun save-the-pinky-undo () (interactive) (message "Save your pinky! Use M-z (Cmd-z) instead."))
(defun save-the-pinky-window () (interactive) (message "Save your pinky! Use M-` (Cmd-`) instead."))
(global-set-key "\C-_" 'save-the-pinky-undo)
(global-set-key "\C-x\C-f" 'save-the-pinky-open)
(global-set-key "\C-xo" 'save-the-pinky-other-window)
(global-set-key "\C-x\C-s" 'save-the-pinky-save)
(global-set-key "\C-x\C-b" 'save-the-pinky-buffer)
(global-set-key "\M-o" 'find-file)
(global-set-key "\M-s" 'save-buffer)