From bda71bcfd8ebfff7d3a9d5c81968aa2031fbdda2 Mon Sep 17 00:00:00 2001 From: Phil Jackson Date: Tue, 5 Aug 2008 08:40:41 +0100 Subject: [PATCH] etest.el: Using `destructuring-bind' for deftest. --- etest.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/etest.el b/etest.el index 8623397..da092bc 100644 --- a/etest.el +++ b/etest.el @@ -92,8 +92,7 @@ test . See `deftest' for details of how to modify this.") "Define a new test. DETAILS must be a list containing the name of the test and the argcount. FUNC is the actual function that will be run." - (let ((name (car details)) - (argcount (cadr details))) + (destructuring-bind (name argcount) details (plist-put etest-candidates-plist name (list func argcount)))) -- 2.11.4.GIT