installer: Use a Guile-Newt snapshot that supports 'form-watch-fd'.
* gnu/installer.scm (guile-newt): New variable.
This commit is contained in:
		
							parent
							
								
									91ba90c18b
								
							
						
					
					
						commit
						5ce84b1713
					
				
					 1 changed files with 21 additions and 0 deletions
				
			
		|  | @ -26,6 +26,8 @@ | |||
|   #:use-module (guix utils) | ||||
|   #:use-module (guix ui) | ||||
|   #:use-module ((guix self) #:select (make-config.scm)) | ||||
|   #:use-module (guix packages) | ||||
|   #:use-module (guix git-download) | ||||
|   #:use-module (gnu installer utils) | ||||
|   #:use-module (gnu packages admin) | ||||
|   #:use-module (gnu packages base) | ||||
|  | @ -280,6 +282,25 @@ selected keymap." | |||
|              ((installer-final-page current-installer) | ||||
|               result prev-steps)))))))) | ||||
| 
 | ||||
| (define guile-newt | ||||
|   ;; Guile-Newt with 'form-watch-fd'. | ||||
|   ;; TODO: Remove once a new release is out. | ||||
|   (let ((commit "b3c885d42cfac327d3531c9d064939514ce6bf12") | ||||
|         (revision "1")) | ||||
|     (package | ||||
|       (inherit (@ (gnu packages guile-xyz) guile-newt)) | ||||
|       (name "guile-newt") | ||||
|       (version (git-version "0.0.1" revision commit)) | ||||
|       (source  (origin | ||||
|                  (method git-fetch) | ||||
|                  (uri (git-reference | ||||
|                        (url "https://gitlab.com/mothacehe/guile-newt") | ||||
|                        (commit commit))) | ||||
|                  (file-name (git-file-name name version)) | ||||
|                  (sha256 | ||||
|                   (base32 | ||||
|                    "02p0bi6c05699idgx6gfkljhqgi8zf09clhzx81i8wa064s70r1y"))))))) | ||||
| 
 | ||||
| (define (installer-program) | ||||
|   "Return a file-like object that runs the given INSTALLER." | ||||
|   (define init-gettext | ||||
|  |  | |||
		Reference in a new issue