summary refs log tree commit diff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2020-10-02 09:29:26 +0200
committerLudovic Courtès <ludo@gnu.org>2020-10-02 09:29:26 +0200
commit9471aea76ace5c0998d889fc5fbde7a6bcafc654 (patch)
tree3a745a8001c55debc19b8e7eca568a47dbfa7c45
parent9dc27bc38822e5b09150d7b567c05cd47259897e (diff)
downloadguix-9471aea76ace5c0998d889fc5fbde7a6bcafc654.tar.gz
gexp: Fix argument ordering in 'local-file' macro.
Fixes a regression introduced in
f43ffee90882c2d61b46d69728daa7432be297e4.
Reported by jonsger on #guix.

* guix/gexp.scm (local-file): In the non-literal case, add #:literal?
and #:location after REST.
-rw-r--r--guix/gexp.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/guix/gexp.scm b/guix/gexp.scm
index 40346b61e1..25e4881d21 100644
--- a/guix/gexp.scm
+++ b/guix/gexp.scm
@@ -454,9 +454,9 @@ appears."
        (with-syntax ((location (datum->syntax s (syntax-source s))))
         #`(%local-file file
                        (delay (absolute-file-name file (getcwd)))
+                       rest ...
                        #:location 'location
-                       #:literal? #f
-                       rest ...)))
+                       #:literal? #f)))
       ((_)
        #'(syntax-error "missing file name"))
       (id