[Pkg-gnupg-commit] [gnupg2] 10/160: tests/gpgscm: Fix error hook.

[Daniel Kahn Gillmor]

This is an automated email from the git hooks/post-receive script.

dkg pushed a commit to branch upstream
in repository gnupg2.

commit e02c1ccae13e4eb55afef8de4f29022c709404eb
Author: Justus Winter <justus at g10code.com>
Date:   Thu Jan 7 16:53:06 2016 +0100

    tests/gpgscm: Fix error hook.
    
    * tests/gpgscm/init.scm (*error-hook*): Fix error hook so that the
    whole error message is displayed.
    
    Signed-off-by: Justus Winter <justus at g10code.com>
---
 tests/gpgscm/init.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/tests/gpgscm/init.scm b/tests/gpgscm/init.scm
index 57ae079..3c0ee7d 100644
--- a/tests/gpgscm/init.scm
+++ b/tests/gpgscm/init.scm
@@ -577,7 +577,8 @@
                     (pop-handler)
                     ,label)))))
 
-(define *error-hook* throw)
+(define (*error-hook* . args)
+  (throw args))
 
 
 ;;;;; Definition of MAKE-ENVIRONMENT, to be used with two-argument EVAL

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-gnupg/gnupg2.git