02/03: gnu: ibus: Generate C from Vala sources.

[Ricardo Wurmus]

rekado pushed a commit to branch master
in repository guix.

commit d5332e756e8e45f22498c0d3d73a26d4b15731a8
Author: Ricardo Wurmus <address@hidden>
Date:   Thu Aug 25 11:03:02 2016 +0200

    gnu: ibus: Generate C from Vala sources.
    
    * gnu/packages/ibus.scm (ibus)[native-inputs]: Add vala.
    [arguments]: Add "delete-generated-files" phase.
---
 gnu/packages/ibus.scm |   10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/gnu/packages/ibus.scm b/gnu/packages/ibus.scm
index bf40b01..8011a46 100644
--- a/gnu/packages/ibus.scm
+++ b/gnu/packages/ibus.scm
@@ -68,6 +68,15 @@
             (substitute* "data/dconf/Makefile.in"
               (("dconf update") "echo dconf update"))
             #t))
+        (add-after 'unpack 'delete-generated-files
+          (lambda _
+            (for-each (lambda (file)
+                        (let ((c (string-append (string-drop-right file 4) 
"c")))
+                          (when (file-exists? c)
+                            (format #t "deleting ~a\n" c)
+                            (delete-file c))))
+                      (find-files "." "\\.vala"))
+            #t))
         (add-after 'wrap-program 'wrap-with-additional-paths
           (lambda* (#:key outputs #:allow-other-keys)
             ;; Make sure 'ibus-setup' runs with the correct PYTHONPATH and
@@ -93,6 +102,7 @@
    (native-inputs
     `(("glib" ,glib "bin") ; for glib-genmarshal
       ("gobject-introspection" ,gobject-introspection) ; for g-ir-compiler
+      ("vala" ,vala)
       ("pkg-config" ,pkg-config)))
    (native-search-paths
     (list (search-path-specification