From 68961b4cf39b6d56d21ece0246f8c215f95cc3e1 Mon Sep 17 00:00:00 2001 From: Magnar Sveen Date: Sat, 13 Feb 2016 17:16:52 +0100 Subject: [PATCH] Avoid requiring cl at runtime Closes #120 --- multiple-cursors-core.el | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) diff --git a/multiple-cursors-core.el b/multiple-cursors-core.el index e25f946..ca3c504 100644 --- a/multiple-cursors-core.el +++ b/multiple-cursors-core.el @@ -25,7 +25,14 @@ ;;; Code: -(require 'cl) +(if (require 'cl-lib nil t) + (eval-and-compile + (defalias 'count-if 'cl-count-if) + (defalias 'find-if 'cl-find-if) + (defalias 'incf 'cl-incf) + (defalias 'remove-if-not 'cl-remove-if-not) + (defalias 'symbol-macrolet 'cl-symbol-macrolet)) + (require 'cl)) (require 'rect)