gnu: gammastep: Improve package style.
* gnu/packages/xdisorg.scm (gammastep)[arguments]: Use G-expressions.
This commit is contained in:
		
							parent
							
								
									b6a633920d
								
							
						
					
					
						commit
						ebbf77bf49
					
				
					 1 changed files with 11 additions and 11 deletions
				
			
		| 
						 | 
					@ -1593,17 +1593,17 @@ to an arbitrary balanced color.")
 | 
				
			||||||
        (base32 "1rcciccnwhxh97wlr9gcirdxv33za369jsrgrfzcp3042824pm8i"))))
 | 
					        (base32 "1rcciccnwhxh97wlr9gcirdxv33za369jsrgrfzcp3042824pm8i"))))
 | 
				
			||||||
    (build-system gnu-build-system)
 | 
					    (build-system gnu-build-system)
 | 
				
			||||||
    (arguments
 | 
					    (arguments
 | 
				
			||||||
     `(#:phases
 | 
					     (list
 | 
				
			||||||
       (modify-phases %standard-phases
 | 
					      #:phases
 | 
				
			||||||
         (add-after 'install 'wrap-python-and-typelib
 | 
					      #~(modify-phases %standard-phases
 | 
				
			||||||
           (lambda* (#:key outputs #:allow-other-keys)
 | 
					          (add-after 'install 'wrap-python-and-typelib
 | 
				
			||||||
             ;; Gammastep GUI needs Typelib files from GTK and access
 | 
					            (lambda _
 | 
				
			||||||
             ;; to Python libraries.
 | 
					              ;; Gammastep GUI needs Typelib files from GTK and access to
 | 
				
			||||||
             (wrap-program (string-append (assoc-ref outputs "out")
 | 
					              ;; Python libraries.
 | 
				
			||||||
                                          "/bin/gammastep-indicator")
 | 
					              (wrap-program (string-append #$output "/bin/gammastep-indicator")
 | 
				
			||||||
               `("PYTHONPATH" ":" prefix (,(getenv "GUIX_PYTHONPATH")))
 | 
					                `("PYTHONPATH" ":" prefix (,(getenv "GUIX_PYTHONPATH")))
 | 
				
			||||||
               `("GI_TYPELIB_PATH" ":" prefix
 | 
					                `("GI_TYPELIB_PATH" ":" prefix
 | 
				
			||||||
                 (,(getenv "GI_TYPELIB_PATH")))))))))
 | 
					                  (,(getenv "GI_TYPELIB_PATH")))))))))
 | 
				
			||||||
    (native-inputs
 | 
					    (native-inputs
 | 
				
			||||||
     (list autoconf
 | 
					     (list autoconf
 | 
				
			||||||
           automake
 | 
					           automake
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
		Reference in a new issue