summaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorMartin Polden <martin.polden@gmail.com>2014-05-17 17:58:21 +0200
committerMartin Polden <martin.polden@gmail.com>2014-05-17 18:03:36 +0200
commit2b9af9aa00d593508a5f84cbf1a41420a76f3a09 (patch)
tree539c8414ba613ce0b50c870bceb37e6ba120c242 /lisp
parentf2e2022c3d0856a29997f9cc13d18fc91d539d4d (diff)
Misc cleanup
Diffstat (limited to 'lisp')
-rw-r--r--lisp/init-appearance.el2
-rw-r--r--lisp/init-backup.el4
-rw-r--r--lisp/init-org.el4
-rw-r--r--lisp/init-package.el4
-rw-r--r--lisp/init-rainbow-delimiters.el2
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)