branch: elpa/multiple-cursors
commit 68961b4cf39b6d56d21ece0246f8c215f95cc3e1
Author: Magnar Sveen <[email protected]>
Commit: Magnar Sveen <[email protected]>

    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)
 

Reply via email to