diff --git a/command-log-mode.el b/command-log-mode.el
index 34ec546..b33d2d9 100644
--- a/command-log-mode.el
+++ b/command-log-mode.el
@@ -46,7 +46,7 @@
 
 ;;; Code:
 
-(eval-when-compile (require 'cl))
+(eval-when-compile (require 'cl-lib))
 
 (defvar clm/log-text t
   "A non-nil setting means text will be saved to the command log.")
@@ -252,7 +252,7 @@ Scrolling up can be accomplished with:
         (let ((current (current-buffer)))
           (goto-char (point-max))
           (cond ((and (not clm/log-repeat) (eq cmd clm/last-keyboard-command))
-                 (incf clm/command-repetitions)
+                 (cl-incf clm/command-repetitions)
                  (save-match-data
                    (when (and (> clm/command-repetitions 1)
                               (search-backward "[" (line-beginning-position -1) t))