Clean up
This commit is contained in:
parent
ce9e89ab0b
commit
3c9f160c16
5 changed files with 21 additions and 19 deletions
|
@ -1,5 +1,7 @@
|
||||||
;;; core-os-osx.el --- Mac-specific settings
|
;;; core-os-osx.el --- Mac-specific settings
|
||||||
|
|
||||||
|
(eval-when-compile (require 'core))
|
||||||
|
|
||||||
;; Use a shared clipboard
|
;; Use a shared clipboard
|
||||||
(setq x-select-enable-clipboard t
|
(setq x-select-enable-clipboard t
|
||||||
;; Curse Lion and its sudden but inevitable fullscreen mode!
|
;; Curse Lion and its sudden but inevitable fullscreen mode!
|
||||||
|
|
29
core/core.el
29
core/core.el
|
@ -140,11 +140,6 @@
|
||||||
undo-tree-auto-save-history t
|
undo-tree-auto-save-history t
|
||||||
undo-tree-history-directory-alist `(("." . ,(! (concat narf-temp-dir "undo/")))))
|
undo-tree-history-directory-alist `(("." . ,(! (concat narf-temp-dir "undo/")))))
|
||||||
|
|
||||||
;; Save cursor location across sessions. Only save for files that exist.
|
|
||||||
(require 'saveplace)
|
|
||||||
(setq save-place-file (! (concat narf-temp-dir "saveplace")))
|
|
||||||
(add-hook! find-file (if (file-exists-p (buffer-file-name)) (setq save-place t)))
|
|
||||||
|
|
||||||
;; Save history across sessions
|
;; Save history across sessions
|
||||||
(require 'savehist)
|
(require 'savehist)
|
||||||
(setq savehist-file (! (concat narf-temp-dir "savehist"))
|
(setq savehist-file (! (concat narf-temp-dir "savehist"))
|
||||||
|
@ -162,19 +157,27 @@
|
||||||
recentf-auto-cleanup 600)
|
recentf-auto-cleanup 600)
|
||||||
(recentf-mode 1)
|
(recentf-mode 1)
|
||||||
|
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;; Save cursor location across sessions. Only save for files that exist.
|
||||||
|
(use-package saveplace
|
||||||
|
:defer t
|
||||||
|
:config (setq save-place-file (! (concat narf-temp-dir "saveplace")))
|
||||||
|
:init
|
||||||
|
(add-hook! find-file
|
||||||
|
(if (file-exists-p (buffer-file-name))
|
||||||
|
(require 'saveplace)
|
||||||
|
(setq save-place t))))
|
||||||
|
|
||||||
|
(use-package popwin :config (popwin-mode 1))
|
||||||
|
|
||||||
(use-package help-fns+ ; Improved help commands
|
(use-package help-fns+ ; Improved help commands
|
||||||
:commands (describe-buffer describe-command describe-file
|
:commands (describe-buffer describe-command describe-file
|
||||||
describe-keymap describe-option describe-option-of-type))
|
describe-keymap describe-option describe-option-of-type))
|
||||||
|
|
||||||
(use-package popwin :config (popwin-mode 1))
|
(use-package server
|
||||||
|
:defer 1
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
:config
|
||||||
|
(unless (server-running-p)
|
||||||
(require 'server)
|
(server-start)))
|
||||||
(unless (server-running-p)
|
|
||||||
(server-start))
|
|
||||||
|
|
||||||
(provide 'core)
|
(provide 'core)
|
||||||
;;; core.el ends here
|
;;; core.el ends here
|
||||||
|
|
|
@ -18,9 +18,7 @@
|
||||||
(evil-define-command narf:compile-el (&optional bang)
|
(evil-define-command narf:compile-el (&optional bang)
|
||||||
:repeat nil
|
:repeat nil
|
||||||
(interactive "<!>")
|
(interactive "<!>")
|
||||||
(byte-recompile-file (f-expand "init.el" narf-emacs-dir) nil 0)
|
|
||||||
(byte-recompile-file (f-expand "init-load-path.el" narf-emacs-dir) nil 0)
|
(byte-recompile-file (f-expand "init-load-path.el" narf-emacs-dir) nil 0)
|
||||||
(byte-recompile-file (f-expand "core.el" narf-core-dir) t 0)
|
|
||||||
(if (and (eq major-mode 'emacs-lisp-mode) (not bang))
|
(if (and (eq major-mode 'emacs-lisp-mode) (not bang))
|
||||||
(byte-recompile-file (buffer-file-name) t 0)
|
(byte-recompile-file (buffer-file-name) t 0)
|
||||||
(load (concat narf-script-dir "byte-compile.el"))))
|
(load (concat narf-script-dir "byte-compile.el"))))
|
||||||
|
|
|
@ -1,7 +1,6 @@
|
||||||
;;; module-r.el
|
;;; module-r.el
|
||||||
|
|
||||||
(use-package ess-site
|
(use-package ess-site :mode (("\\.r$" . R-mode)))
|
||||||
:mode (("\\.r$" . R-mode)))
|
|
||||||
|
|
||||||
(provide 'module-r)
|
(provide 'module-r)
|
||||||
;;; module-r.el ends here
|
;;; module-r.el ends here
|
||||||
|
|
|
@ -86,8 +86,8 @@
|
||||||
`(font-lock-doc-face ((t (:foreground ,comments))))
|
`(font-lock-doc-face ((t (:foreground ,comments))))
|
||||||
|
|
||||||
`(trailing-whitespace ((t (:background "#884444"))))
|
`(trailing-whitespace ((t (:background "#884444"))))
|
||||||
`(whitespace-tab ((t (:foreground ,line-hl))))
|
`(whitespace-tab ((t (:foreground "#343d46"))))
|
||||||
`(whitespace-newline ((t (:foreground ,line-hl))))
|
`(whitespace-newline ((t (:foreground "#343d46"))))
|
||||||
`(whitespace-trailing ((t (:background "#553333"))))
|
`(whitespace-trailing ((t (:background "#553333"))))
|
||||||
|
|
||||||
`(highlight-indentation-face ((t (:background "#2f3641"))))
|
`(highlight-indentation-face ((t (:background "#2f3641"))))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue