diff options
author | Martin Polden <martin.polden@gmail.com> | 2014-05-17 17:58:21 +0200 |
---|---|---|
committer | Martin Polden <martin.polden@gmail.com> | 2014-05-17 18:03:36 +0200 |
commit | 2b9af9aa00d593508a5f84cbf1a41420a76f3a09 (patch) | |
tree | 539c8414ba613ce0b50c870bceb37e6ba120c242 | |
parent | f2e2022c3d0856a29997f9cc13d18fc91d539d4d (diff) |
Misc cleanup
-rw-r--r-- | lisp/init-appearance.el | 2 | ||||
-rw-r--r-- | lisp/init-backup.el | 4 | ||||
-rw-r--r-- | lisp/init-org.el | 4 | ||||
-rw-r--r-- | lisp/init-package.el | 4 | ||||
-rw-r--r-- | lisp/init-rainbow-delimiters.el | 2 |
5 files changed, 9 insertions, 7 deletions
diff --git a/lisp/init-appearance.el b/lisp/init-appearance.el index 7e48598..33e9bbd 100644 --- a/lisp/init-appearance.el +++ b/lisp/init-appearance.el @@ -14,7 +14,7 @@ (scroll-bar-mode -1)) ;; highlight current line -(global-hl-line-mode) +(global-hl-line-mode 1) ;; set theme (if (display-graphic-p) diff --git a/lisp/init-backup.el b/lisp/init-backup.el index 44c69df..b6ce2b0 100644 --- a/lisp/init-backup.el +++ b/lisp/init-backup.el @@ -1,8 +1,8 @@ ;; write backup files to separate directory (let ((dirname (expand-file-name (concat user-emacs-directory "backups")))) - (if (not (file-directory-p dirname)) - (make-directory dirname t)) + (when (not (file-directory-p dirname)) + (make-directory dirname t)) (setq backup-directory-alist `(("." . , dirname)))) diff --git a/lisp/init-org.el b/lisp/init-org.el index dfece4b..8cd0877 100644 --- a/lisp/init-org.el +++ b/lisp/init-org.el @@ -6,7 +6,7 @@ ;; set default location for org files (let ((dirname "~/Dropbox/org")) - (if (file-directory-p dirname) - (setq org-directory dirname))) + (when (file-directory-p dirname) + (setq org-directory dirname))) (provide 'init-org) diff --git a/lisp/init-package.el b/lisp/init-package.el index f868c0d..54e9575 100644 --- a/lisp/init-package.el +++ b/lisp/init-package.el @@ -4,8 +4,10 @@ '("melpa" . "http://melpa.milkbox.net/packages/") t) (package-initialize) -;; helper function to install a package if it doesn't exist (defun require-package (package &optional min-version no-refresh) + "Install given PACKAGE, optionally requiring MIN-VERSION. +If NO-REFRESH is non-nil, the available package lists will not be +re-downloaded in order to locate PACKAGE." (if (package-installed-p package min-version) t (if (or (assoc package package-archive-contents) no-refresh) diff --git a/lisp/init-rainbow-delimiters.el b/lisp/init-rainbow-delimiters.el index fe8d76c..b10fe7f 100644 --- a/lisp/init-rainbow-delimiters.el +++ b/lisp/init-rainbow-delimiters.el @@ -3,6 +3,6 @@ ;; load rainbow-delimiters (require 'rainbow-delimiters) -(global-rainbow-delimiters-mode) +(global-rainbow-delimiters-mode 1) (provide 'init-rainbow-delimiters) |