diff --git a/emacs.el b/emacs.el index 63c9d00..db2daae 100644 --- a/emacs.el +++ b/emacs.el @@ -523,6 +523,10 @@ found, otherwise returns nil." 'executable-make-buffer-file-executable-if-script-p) (setq bookmark-default-file "~/.emacs.d/bmk") +(add-hook 'recentf-load-hook + (lambda () + (add-to-list 'recentf-exclude + (regexp-quote bookmark-default-file)))) (and (fetch-library "https://github.com/10sr/emacs-lisp/raw/master/read-only-only-mode.el" @@ -533,8 +537,7 @@ found, otherwise returns nil." "https://raw.github.com/10sr/emacs-lisp/master/smart-revert.el" t) (require 'smart-revert nil t) - (smart-revert-on) - ) + (smart-revert-on)) ;; autosave @@ -687,7 +690,7 @@ found, otherwise returns nil." ;; window ;; forked from http://d.hatena.ne.jp/khiker/20100119/window_resize -(define-key my-prefix-map (kbd "C-w") 'my-window-organizer) +(define-key ctl-x-map (kbd "w") 'my-window-organizer) (defun my-window-organizer () "Control window size and position." @@ -1876,19 +1879,6 @@ if arg given, use that eshell buffer, otherwise make new eshell buffer." nil)) )) -(defun my-keyboard-quit () - "" - (interactive) - (run-hooks 'before-keyboard-quit-hook) - ;; (redisplay t) - (redraw-display) - ;; (run-hooks 'window-configuration-change-hook) - (keyboard-quit) - (insert "insert me") - (run-hooks 'after-keyboard-quit-hook)) -(substitute-key-definition 'keyboard-quit 'my-keyboard-quit global-map) -;; (global-set-key (kbd "C-g") 'my-keyboard-quit) - (defun my-convmv-sjis2utf8-test () "run `convmv -r -f sjis -t utf8 *' this is test, does not rename files"