aboutsummaryrefslogtreecommitdiff
path: root/sx.el
diff options
context:
space:
mode:
Diffstat (limited to 'sx.el')
-rw-r--r--sx.el13
1 files changed, 5 insertions, 8 deletions
diff --git a/sx.el b/sx.el
index 829570f..955dc68 100644
--- a/sx.el
+++ b/sx.el
@@ -264,14 +264,11 @@ whenever BODY evaluates to nil."
COMPARE-FUNC is a function that takes the return value of
GET-FUNC and performs the actual comparison."
(declare (indent 1) (doc-string 2))
- `(progn
- ;; In using `defalias', the macro supports both function
- ;; symbols and lambda expressions.
- (defun ,name (a b)
- ,doc
- (funcall ,compare-func
- (funcall ,get-func a)
- (funcall ,get-func b)))))
+ `(defun ,name (a b)
+ ,doc
+ (funcall ,compare-func
+ (funcall ,get-func a)
+ (funcall ,get-func b))))
;;; Printing request data