diff options
| author | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-10-21 23:36:38 +0100 |
|---|---|---|
| committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-10-21 23:36:38 +0100 |
| commit | fa0857976087ba28b8cdd68e7c1847b43756036f (patch) | |
| tree | 4f2b99fa2971d689b3eef9e39674415fd6043365 /cider-compat.el | |
| parent | 4210c4d076f4b91585b5621d2b64097ae2483c55 (diff) | |
Delete some empty lines
Diffstat (limited to 'cider-compat.el')
| -rw-r--r-- | cider-compat.el | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/cider-compat.el b/cider-compat.el index e001eae5..a5f52293 100644 --- a/cider-compat.el +++ b/cider-compat.el @@ -127,9 +127,7 @@ threading." (eval-and-compile (unless (fboundp 'if-let) - (defmacro if-let (bindings then &rest else) - "Process BINDINGS and if all values are non-nil eval THEN, else ELSE. Argument BINDINGS is a list of tuples whose car is a symbol to be bound and (optionally) used in THEN, and its cadr is a sexp to be @@ -146,7 +144,6 @@ to bind a single value, BINDINGS can just be a plain tuple." ,then ,@else))) - (defmacro when-let (bindings &rest body) "Process BINDINGS and if all values are non-nil eval BODY. Argument BINDINGS is a list of tuples whose car is a symbol to be @@ -154,11 +151,7 @@ bound and (optionally) used in BODY, and its cadr is a sexp to be evalled to set symbol's value. In the special case you only want to bind a single value, BINDINGS can just be a plain tuple." (declare (indent 1) (debug if-let)) - (list 'if-let bindings (macroexp-progn body)))) - - - - ) + (list 'if-let bindings (macroexp-progn body))))) (provide 'cider-compat) ;;; cider-compat.el ends here |