[elpa] master 8f3160b 07/11: Fix missing dependency on cl-lib

[Ingo Lohmar]

branch: master
commit 8f3160b66e1c63688b4b487caa02ab77abb46e9d
Author: Ingo Lohmar <address@hidden>
Commit: Ingo Lohmar <address@hidden>

    Fix missing dependency on cl-lib
---
 wconf.el |   10 ++++++----
 1 files changed, 6 insertions(+), 4 deletions(-)

diff --git a/wconf.el b/wconf.el
index 242e11b..eecac24 100644
--- a/wconf.el
+++ b/wconf.el
@@ -65,6 +65,8 @@ this can be nil although wc--configs is not empty.")
 (defvar wc-string nil
   "String representing information on the current configuration.")
 
+(require 'cl-lib)
+
 (defsubst wc--ensure-configs ()
   (unless wc--configs
     (error "No window configurations")))
@@ -80,7 +82,7 @@ this can be nil although wc--configs is not empty.")
   (if index
       (format "%s:%s"
               (number-to-string index)
-              (caddr (wc- index)))
+              (cl-caddr (wc- index)))
     (concat "-:" wc-no-config-name)))
 
 (defun wc--update-info ()
@@ -195,7 +197,7 @@ window config."
                               (wc--to-string wc--index))
                      (list (wc--copy (car wc))
                            (wc--copy (cadr wc))
-                           (caddr wc)))))))
+                           (cl-caddr wc)))))))
   (wc--use-config (1- (length wc--configs))))
 
 (defun wc-kill ()
@@ -273,8 +275,8 @@ window config."
   (interactive
    (list
     (read-string "New window configuration name: "
-                 (caddr (wc- wc--index)))))
-  (setf (caddr (wc- wc--index)) name)
+                 (cl-caddr (wc- wc--index)))))
+  (setf (cl-caddr (wc- wc--index)) name)
   (message "wc: Renamed configuration to %s" name)
   (wc--update-info))