el/mdw-multiple-cursors.el: Use the `cl-' names for CL-ish functions.

[profile] / el / mdw-multiple-cursors.el

diff --git a/el/mdw-multiple-cursors.el b/el/mdw-multiple-cursors.el
index c384a4b..d5d77a3 100644 (file)
--- a/el/mdw-multiple-cursors.el
+++ b/el/mdw-multiple-cursors.el
@@ -27,6 +27,8 @@
 ;; (autoload 'mdw-multiple-cursors-keymap "mdw-multiple-cursors.el"
 ;;   "A keymap for Magnar Sveen's awesome multiple-cursors." nil 'keymap)
 
+(require 'cl-lib)
+
 ;;;--------------------------------------------------------------------------
 ;;; Some machinery for omitting key prefixes.
 
@@ -79,7 +81,7 @@ forms) to appear at the start of the wrapper function."
 ;;;--------------------------------------------------------------------------
 ;;; The multiple-cursors key bindings.
 
-(eval-when (load eval)
+(cl-eval-when (load eval)
   (require 'multiple-cursors))
 
 (defvar mdw-multiple-cursors-keymap (make-sparse-keymap)