[elpa] externals/ztree 2f62ba7 18/23: Issue #62: Cleared warnings

[Stefan Monnier]

branch: externals/ztree
commit 2f62ba7502f0cb8783ee39179ea8973593bf8c99
Author: Alexey Veretennikov <alexey.veretennikov@gmail.com>
Commit: Alexey Veretennikov <alexey.veretennikov@gmail.com>

    Issue #62: Cleared warnings
---
 ztree-view.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/ztree-view.el b/ztree-view.el
index 1a677e8..c539699 100644
--- a/ztree-view.el
+++ b/ztree-view.el
@@ -42,6 +42,7 @@
 ;;
 ;;; Code:
 
+(eval-when-compile (require 'cl))
 (require 'subr-x)
 (require 'ztree-util)
 
@@ -189,8 +190,7 @@ the buffer is split to 2 trees")
 
 (defun ztree-scroll-to-line (line)
   "Set the cursor to specified LINE and to the text offset (if possible)."
-  (let ((cur-pos (current-column))
-        (center (/ (window-width) 2))
+  (let ((center (/ (window-width) 2))
         (cur-line (line-number-at-pos)))
     ;; based on dired-next-line
     ;; set line-move to move by logical lines