gnu: openttd: Add 'install-data' phase.
* gnu/packages/games.scm (openttd)[arguments]: Add it. [native-inputs]: Add openttd-opengfx.
This commit is contained in:
		
							parent
							
								
									4df9495e68
								
							
						
					
					
						commit
						ca508f1cfb
					
				
					 1 changed files with 19 additions and 1 deletions
				
			
		| 
						 | 
					@ -2359,7 +2359,25 @@ OpenGFX provides you with...
 | 
				
			||||||
(define-public openttd
 | 
					(define-public openttd
 | 
				
			||||||
  (package
 | 
					  (package
 | 
				
			||||||
    (inherit openttd-engine)
 | 
					    (inherit openttd-engine)
 | 
				
			||||||
    (name "openttd")))
 | 
					    (name "openttd")
 | 
				
			||||||
 | 
					    (arguments
 | 
				
			||||||
 | 
					     (substitute-keyword-arguments (package-arguments openttd-engine)
 | 
				
			||||||
 | 
					       ((#:phases phases)
 | 
				
			||||||
 | 
					        `(modify-phases ,phases
 | 
				
			||||||
 | 
					           (add-after 'install 'install-data
 | 
				
			||||||
 | 
					             (lambda* (#:key inputs outputs #:allow-other-keys)
 | 
				
			||||||
 | 
					               (let*
 | 
				
			||||||
 | 
					                   ((opengfx (assoc-ref inputs "opengfx"))
 | 
				
			||||||
 | 
					                    (out (assoc-ref outputs "out"))
 | 
				
			||||||
 | 
					                    (gfx-dir
 | 
				
			||||||
 | 
					                     (string-append out
 | 
				
			||||||
 | 
					                                    "/share/games/openttd/baseset/opengfx")))
 | 
				
			||||||
 | 
					                 (mkdir-p gfx-dir)
 | 
				
			||||||
 | 
					                 (copy-recursively opengfx gfx-dir))
 | 
				
			||||||
 | 
					               #t))))))
 | 
				
			||||||
 | 
					    (native-inputs
 | 
				
			||||||
 | 
					     `(("opengfx" ,openttd-opengfx)
 | 
				
			||||||
 | 
					       ,@(package-native-inputs openttd-engine)))))
 | 
				
			||||||
 | 
					
 | 
				
			||||||
(define-public pinball
 | 
					(define-public pinball
 | 
				
			||||||
  (package
 | 
					  (package
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
		Reference in a new issue