blob: 142229d547e176582c78d03a8b03a1b80b7bac3f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
index 58d3b8d..c003987 100644
--- a/noflet.el
+++ b/noflet.el
@@ -28,10 +28,8 @@
;;; Code:
-(eval-when-compile (require 'cl))
-(if (version< emacs-version "24.4.1")
- (load-library "cl-indent")
- (require 'cl-indent))
+(require 'dash)
+(require 'cl-lib)
(defun noflet|base ()
"A base function."
index 58d3b8d..73f0719 100644
--- a/noflet.el
+++ b/noflet.el
@@ -155,7 +155,7 @@ maintainers refuse to add the correct indentation spec to
(indent noflet-indent-func))
`(cl-flet ,bindings ,@body))
-(defmacro* letn (tag bindings &rest body)
+(cl-defmacro letn (tag bindings &rest body)
(declare (debug (sexp sexp &rest form))
(indent 2))
`(cl-labels ((,tag ,(-map 'car bindings) ,@body))
|