gnu: ibus: Generate C from Vala sources.
* gnu/packages/ibus.scm (ibus)[native-inputs]: Add vala. [arguments]: Add "delete-generated-files" phase.
This commit is contained in:
		
							parent
							
								
									590021db3f
								
							
						
					
					
						commit
						d5332e756e
					
				
					 1 changed files with 10 additions and 0 deletions
				
			
		| 
						 | 
					@ -68,6 +68,15 @@
 | 
				
			||||||
            (substitute* "data/dconf/Makefile.in"
 | 
					            (substitute* "data/dconf/Makefile.in"
 | 
				
			||||||
              (("dconf update") "echo dconf update"))
 | 
					              (("dconf update") "echo dconf update"))
 | 
				
			||||||
            #t))
 | 
					            #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
 | 
					        (add-after 'wrap-program 'wrap-with-additional-paths
 | 
				
			||||||
          (lambda* (#:key outputs #:allow-other-keys)
 | 
					          (lambda* (#:key outputs #:allow-other-keys)
 | 
				
			||||||
            ;; Make sure 'ibus-setup' runs with the correct PYTHONPATH and
 | 
					            ;; Make sure 'ibus-setup' runs with the correct PYTHONPATH and
 | 
				
			||||||
| 
						 | 
					@ -93,6 +102,7 @@
 | 
				
			||||||
   (native-inputs
 | 
					   (native-inputs
 | 
				
			||||||
    `(("glib" ,glib "bin") ; for glib-genmarshal
 | 
					    `(("glib" ,glib "bin") ; for glib-genmarshal
 | 
				
			||||||
      ("gobject-introspection" ,gobject-introspection) ; for g-ir-compiler
 | 
					      ("gobject-introspection" ,gobject-introspection) ; for g-ir-compiler
 | 
				
			||||||
 | 
					      ("vala" ,vala)
 | 
				
			||||||
      ("pkg-config" ,pkg-config)))
 | 
					      ("pkg-config" ,pkg-config)))
 | 
				
			||||||
   (native-search-paths
 | 
					   (native-search-paths
 | 
				
			||||||
    (list (search-path-specification
 | 
					    (list (search-path-specification
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
		Reference in a new issue