diff options
| author | David Thompson <davet@gnu.org> | 2015-05-26 08:57:03 -0400 |
|---|---|---|
| committer | David Thompson <davet@gnu.org> | 2015-05-26 08:57:03 -0400 |
| commit | 161e57ba200961f430e0538a72bf3b7a19b3781d (patch) | |
| tree | 6b636f4670e4c2fc6bce66cb5c40c4933aeb8d96 | |
| parent | 2c829773f1f23434e34154d01fc7a54192252e8a (diff) | |
emacs: Update config.
| -rw-r--r-- | dotfiles/.emacs.d/init.el | 26 |
1 files changed, 15 insertions, 11 deletions
diff --git a/dotfiles/.emacs.d/init.el b/dotfiles/.emacs.d/init.el index 54a0b0a..5ae1970 100644 --- a/dotfiles/.emacs.d/init.el +++ b/dotfiles/.emacs.d/init.el @@ -6,6 +6,9 @@ ;; No splash screen. (setf inhibit-startup-message t) +;; Maximize frames +(add-to-list 'default-frame-alist '(fullscreen . maximized)) + ;;; ;;; Packages ;;; @@ -16,7 +19,7 @@ (package-initialize) ;; Additional packages that I use. -(setq required-packages +(setf required-packages '(better-defaults elfeed emms @@ -218,17 +221,18 @@ might be bad." (show-paren-mode t) +(defmacro use-mode-for-lisp (mode) + `(progn + (add-hook 'emacs-lisp-mode-hook (lambda () (,mode t))) + (add-hook 'lisp-mode-hook (lambda () (,mode t))) + (add-hook 'lisp-interaction-mode-hook (lambda () (,mode t))) + (add-hook 'scheme-mode-hook (lambda () (,mode t))))) + (when-require 'rainbow-delimiters - (global-rainbow-delimiters-mode t)) + (use-mode-for-lisp rainbow-delimiters-mode)) (when-require 'paredit - (defun use-paredit () - (paredit-mode t)) - - (add-hook 'emacs-lisp-mode-hook 'use-paredit) - (add-hook 'lisp-mode-hook 'use-paredit) - (add-hook 'lisp-interaction-mode-hook 'use-paredit) - (add-hook 'scheme-mode-hook 'use-paredit)) + (use-mode-for-lisp paredit-mode)) (when-require 'geiser (setf geiser-active-implementations '(guile)) @@ -311,8 +315,8 @@ might be bad." ;;; (when-require 'notmuch - (when-require 'notmuch-unread - (notmuch-unread-mode 1)) + ;; (when-require 'notmuch-unread + ;; (notmuch-unread-mode 1)) (global-set-key (kbd "C-c m") 'notmuch) |