summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNic Ferrier <nferrier@ferrier.me.uk>2014-08-22 13:37:24 +0100
committerNic Ferrier <nferrier@ferrier.me.uk>2014-08-22 13:37:24 +0100
commit688b3d6a451fe1a9b3fce4ef373d70693bd7986d (patch)
tree4a975acf6b5a59b7839c2b3e27e2ea0850e17125
parent5c0cb55ca78c313cfde7969c7f6a198234c035c7 (diff)
parentf077d8ec10053acd25d99369402c046bb640d798 (diff)
Merge branch 'master' of github.com:nicferrier/emacs-noflet
# Please enter a commit message to explain why this merge is necessary, # especially if it merges an updated upstream into a topic branch. # # Lines starting with '#' will be ignored, and an empty message aborts # the commit.
-rw-r--r--noflet.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/noflet.el b/noflet.el
index 11c0bf1..e4db529 100644
--- a/noflet.el
+++ b/noflet.el
@@ -65,9 +65,10 @@ name."
(intern (format "saved-func-%s"
(symbol-name name)))))
`(fset (quote ,name)
- (lambda ,args
- (let ((this-fn ,saved-func-namev))
- ,@body))))))))
+ (cl-function
+ (lambda ,args
+ (let ((this-fn ,saved-func-namev))
+ ,@body)))))))))
(fresets
(cl-loop
for i in bindings