gnu: gtk+ use modify-phases
* gnu/packages/gtk.scm (arguments): Replace alist-cons-before with modify-phases
This commit is contained in:
		
							parent
							
								
									5d87088c39
								
							
						
					
					
						commit
						e4360e16f9
					
				
					 1 changed files with 12 additions and 14 deletions
				
			
		| 
						 | 
					@ -673,9 +673,8 @@ application suites.")
 | 
				
			||||||
      #:configure-flags (list (string-append "--with-html-dir="
 | 
					      #:configure-flags (list (string-append "--with-html-dir="
 | 
				
			||||||
                                             (assoc-ref %outputs "doc")
 | 
					                                             (assoc-ref %outputs "doc")
 | 
				
			||||||
                                             "/share/gtk-doc/html"))
 | 
					                                             "/share/gtk-doc/html"))
 | 
				
			||||||
      #:phases
 | 
					      #:phases (modify-phases %standard-phases
 | 
				
			||||||
      (alist-cons-before
 | 
					        (add-before 'configure 'pre-configure
 | 
				
			||||||
       'configure 'pre-configure
 | 
					 | 
				
			||||||
          (lambda _
 | 
					          (lambda _
 | 
				
			||||||
            ;; Disable most tests, failing in the chroot with the message:
 | 
					            ;; Disable most tests, failing in the chroot with the message:
 | 
				
			||||||
            ;; D-Bus library appears to be incorrectly set up; failed to read
 | 
					            ;; D-Bus library appears to be incorrectly set up; failed to read
 | 
				
			||||||
| 
						 | 
					@ -685,8 +684,7 @@ application suites.")
 | 
				
			||||||
            (substitute* "testsuite/Makefile.in"
 | 
					            (substitute* "testsuite/Makefile.in"
 | 
				
			||||||
              (("SUBDIRS = gdk gtk a11y css reftests")
 | 
					              (("SUBDIRS = gdk gtk a11y css reftests")
 | 
				
			||||||
               "SUBDIRS = gdk"))
 | 
					               "SUBDIRS = gdk"))
 | 
				
			||||||
         #t)
 | 
					            #t)))))
 | 
				
			||||||
       %standard-phases)))
 | 
					 | 
				
			||||||
   (native-search-paths
 | 
					   (native-search-paths
 | 
				
			||||||
    (list (search-path-specification
 | 
					    (list (search-path-specification
 | 
				
			||||||
           (variable "GUIX_GTK3_PATH")
 | 
					           (variable "GUIX_GTK3_PATH")
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
		Reference in a new issue