From 9384846e079be8db3e564f836b3d50d6bf727645 Mon Sep 17 00:00:00 2001
From: Bozhidar Batsov <bozhidar@tradeo.com>
Date: Mon, 17 Dec 2012 17:43:35 +0200
Subject: [PATCH] bye, bye cl
---
core/prelude-core.el | 4 ++--
core/prelude-packages.el | 6 +++---
init.el | 2 --
3 files changed, 5 insertions(+), 7 deletions(-)
diff --git a/core/prelude-core.el b/core/prelude-core.el
index a9da450..71b8ffe 100644
--- a/core/prelude-core.el
+++ b/core/prelude-core.el
@@ -269,8 +269,8 @@ there's a region, all lines that region covers will be duplicated."
(interactive)
(if (/= (count-windows) 2)
(message "You need exactly 2 windows to do this.")
- (let* ((w1 (first (window-list)))
- (w2 (second (window-list)))
+ (let* ((w1 (car (window-list)))
+ (w2 (cadr (window-list)))
(b1 (window-buffer w1))
(b2 (window-buffer w2))
(s1 (window-start w1))
diff --git a/core/prelude-packages.el b/core/prelude-packages.el
index 74dedfd..c6c8732 100644
--- a/core/prelude-packages.el
+++ b/core/prelude-packages.el
@@ -99,9 +99,9 @@
(-each prelude-auto-install-alist
(lambda (entry)
- (let ((extension (first entry))
- (package (second entry))
- (mode (third entry)))
+ (let ((extension (car entry))
+ (package (cadr entry))
+ (mode (cadr (cdr entry))))
(unless (package-installed-p package)
(prelude-auto-install extension package mode)))))
diff --git a/init.el b/init.el
index ea95286..e6d9121 100644
--- a/init.el
+++ b/init.el
@@ -58,8 +58,6 @@ ELPA (or MELPA).")
(unless (file-exists-p prelude-savefile-dir)
(make-directory prelude-savefile-dir))
-(require 'cl)
-
(defun prelude-add-subfolders-to-load-path (parent-dir)
"Adds all first level `parent-dir' subdirs to the
Emacs load path."