about summary refs log tree commit diff
diff options
context:
space:
mode:
-rw-r--r--sent/make.scm32
1 files changed, 16 insertions, 16 deletions
diff --git a/sent/make.scm b/sent/make.scm
index 2ec3034..9525580 100644
--- a/sent/make.scm
+++ b/sent/make.scm
@@ -44,22 +44,22 @@
                               (file-append libxrender "/include")
                               (file-append xorgproto "/include")))))
   (link "sent"
-        (list (compile "sent/sent.c"
-                       #:flags (list "-DVERSION=\"1\""
-                                     "-I" include-dependencies
-                                     "-I" (file-union "include"
-                                                      `(("arg.h" ,(local-file "sent/arg.h"))
-                                                        ("config.h" ,(local-file "sent/config.def.h"))
-                                                        ("drw.h" ,(local-file "sent/drw.h"))
-                                                        ("util.h" ,(local-file "sent/util.h"))))))
-              (compile "sent/drw.c"
-                       #:flags (list "-I" include-dependencies
-                                     "-I" (file-union "include"
-                                                      `(("drw.h" ,(local-file "sent/drw.h"))
-                                                        ("util.h" ,(local-file "sent/util.h"))))))
-              (compile "sent/util.c"
-                       #:flags (list "-I" (file-union "include"
-                                                      `(("util.h" ,(local-file "sent/util.h")))))))
+        (list (let ((headers `(("arg.h" ,(local-file "sent/arg.h"))
+                               ("config.h" ,(local-file "sent/config.def.h"))
+                               ("drw.h" ,(local-file "sent/drw.h"))
+                               ("util.h" ,(local-file "sent/util.h")))))
+                (compile "sent/sent.c"
+                         #:flags (list "-DVERSION=\"1\""
+                                       "-I" include-dependencies
+                                       "-I" (file-union "include" headers))))
+              (let ((headers `(("drw.h" ,(local-file "sent/drw.h"))
+                               ("util.h" ,(local-file "sent/util.h")))))
+                (compile "sent/drw.c"
+                         #:flags (list "-I" include-dependencies
+                                       "-I" (file-union "include" headers))))
+              (let ((headers `(("util.h" ,(local-file "sent/util.h")))))
+                (compile "sent/util.c"
+                         #:flags (list "-I" (file-union "include" headers)))))
         #:flags (list "-L" (file-append fontconfig "/lib")
                       "-L" (file-append libx11 "/lib")
                       "-L" (file-append libxft "/lib")