From 2b9af9aa00d593508a5f84cbf1a41420a76f3a09 Mon Sep 17 00:00:00 2001
From: Martin Polden <martin.polden@gmail.com>
Date: Sat, 17 May 2014 17:58:21 +0200
Subject: Misc cleanup

---
 lisp/init-appearance.el         | 2 +-
 lisp/init-backup.el             | 4 ++--
 lisp/init-org.el                | 4 ++--
 lisp/init-package.el            | 4 +++-
 lisp/init-rainbow-delimiters.el | 2 +-
 5 files changed, 9 insertions(+), 7 deletions(-)

(limited to 'lisp')

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)
-- 
cgit v1.2.3