From 328c4de8361d1b70c5927e231efac4d9f70fa48d Mon Sep 17 00:00:00 2001 From: Reiner Steib Date: Thu, 15 May 2008 20:11:34 +0000 Subject: [PATCH] (nnir-add-result): Properly substitute the parameters. --- contrib/ChangeLog | 2 +- contrib/nnir.el | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/contrib/ChangeLog b/contrib/ChangeLog index e1d444eed..7ab762706 100644 --- a/contrib/ChangeLog +++ b/contrib/ChangeLog @@ -1,4 +1,4 @@ -2008-05-08 Andreas Schwab +2008-05-15 Andreas Schwab * nnir.el (nnir-add-result): Properly substitute the parameters. diff --git a/contrib/nnir.el b/contrib/nnir.el index 8b106df70..a0f040878 100644 --- a/contrib/nnir.el +++ b/contrib/nnir.el @@ -849,9 +849,9 @@ and show thread that contains this article." (defmacro nnir-add-result (dirnam artno score prefix server artlist) "Ask `nnir-compose-result' to construct a result vector, and if it is non-nil, add it to artlist." - `(let ((result (nnir-compose-result dirnam artno score prefix server))) + `(let ((result (nnir-compose-result ,dirnam ,artno ,score ,prefix ,server))) (when (not (null result)) - (push result artlist)))) + (push result ,artlist)))) (autoload 'nnmaildir-base-name-to-article-number "nnmaildir") -- 2.25.1