Browse Source

Add prelude-find-user-init-file

custom
Bozhidar Batsov 12 years ago
parent
commit
879d3f3470
  1. 5
      core/prelude-core.el
  2. 1
      core/prelude-mode.el

5
core/prelude-core.el

@ -533,5 +533,10 @@ This follows freedesktop standards, should work in X servers."
'(2 "_NET_WM_STATE_FULLSCREEN" 0)) '(2 "_NET_WM_STATE_FULLSCREEN" 0))
(error "Only X server is supported"))) (error "Only X server is supported")))
(defun prelude-find-user-init-file ()
"Edit the `user-init-file', in another window."
(interactive)
(find-file-other-window user-init-file))
(provide 'prelude-core) (provide 'prelude-core)
;;; prelude-core.el ends here ;;; prelude-core.el ends here

1
core/prelude-mode.el

@ -64,6 +64,7 @@
(define-key map (kbd "C-c h") 'helm-prelude) (define-key map (kbd "C-c h") 'helm-prelude)
(define-key map (kbd "C-c +") 'prelude-increment-integer-at-point) (define-key map (kbd "C-c +") 'prelude-increment-integer-at-point)
(define-key map (kbd "C-c -") 'prelude-decrement-integer-at-point) (define-key map (kbd "C-c -") 'prelude-decrement-integer-at-point)
(define-key map (kbd "C-c I") 'prelude-find-user-init-file)
;; make some use of the Super key ;; make some use of the Super key
(define-key map [?\s-d] 'projectile-find-dir) (define-key map [?\s-d] 'projectile-find-dir)
(define-key map [?\s-p] 'projectile-switch-project) (define-key map [?\s-p] 'projectile-switch-project)

Loading…
Cancel
Save