02/04: ui: Use the right accessor when reporting '&gexp-input-error'.

[guix-commits]

civodul pushed a commit to branch version-1.2.0
in repository guix.

commit 362529963ea38dd0d9bcdd54d5fced5243427f3d
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Tue Nov 10 14:40:20 2020 +0100

    ui: Use the right accessor when reporting '&gexp-input-error'.
    
    * guix/ui.scm (call-with-error-handling): In the 'gexp-input-error?'
    case, use 'gexp-error-invalid-input' as the accessor.
---
 guix/ui.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/guix/ui.scm b/guix/ui.scm
index d5327a5..4e68629 100644
--- a/guix/ui.scm
+++ b/guix/ui.scm
@@ -718,7 +718,7 @@ evaluating the tests and bodies of CLAUSES."
                        (package-full-name package)
                        (build-system-name system))))
              ((gexp-input-error? c)
-              (let ((input (package-error-invalid-input c)))
+              (let ((input (gexp-error-invalid-input c)))
                 (leave (G_ "~s: invalid G-expression input~%")
                        (gexp-error-invalid-input c))))
              ((profile-not-found-error? c)