diff options
Diffstat (limited to '.emacs.d/init-spw.el')
-rw-r--r-- | .emacs.d/init-spw.el | 11 |
1 files changed, 8 insertions, 3 deletions
diff --git a/.emacs.d/init-spw.el b/.emacs.d/init-spw.el index aaf0eb0c..00865f94 100644 --- a/.emacs.d/init-spw.el +++ b/.emacs.d/init-spw.el @@ -48,17 +48,22 @@ add places the library might be available to `load-path'." (defmacro spw/bind-command-with-cycling (bindings generator &optional on-exit map) (list 'spw/bind-command-with-cycling* (spw/expand-binding-pairs bindings) - `(lambda (_ret-val) + `(lambda (_ignore) ,generator) `(lambda () ,on-exit) map)) -(defmacro spw/bind-command-with-ret-val-cycling (bindings &optional generator on-exit map) +(cl-defmacro spw/bind-command-with-ret-val-cycling + (bindings + &optional + (generator '(spw/buffer-ring-cycle-lambda)) + on-exit + map) (list 'spw/bind-command-with-cycling* (spw/expand-binding-pairs bindings) `(lambda (ret-val) - ,(or generator '(spw/buffer-ring-cycle-lambda))) + ,generator) `(lambda () ,on-exit) map)) |