installer: final: Make sure 'bold' font files are loaded.
* gnu/installer/newt/final.scm (run-install-shell): Force kmscon to open 'bold' font files, before the cow-store overlay is mounted.
This commit is contained in:
		
							parent
							
								
									e88745a655
								
							
						
					
					
						commit
						876a8d9870
					
				
					 1 changed files with 8 additions and 0 deletions
				
			
		| 
						 | 
				
			
			@ -25,6 +25,7 @@
 | 
			
		|||
  #:use-module (gnu installer newt page)
 | 
			
		||||
  #:use-module (gnu installer newt utils)
 | 
			
		||||
  #:use-module (guix i18n)
 | 
			
		||||
  #:use-module (guix colors)
 | 
			
		||||
  #:use-module (srfi srfi-34)
 | 
			
		||||
  #:use-module (srfi srfi-35)
 | 
			
		||||
  #:use-module (ice-9 match)
 | 
			
		||||
| 
						 | 
				
			
			@ -101,6 +102,13 @@ a specific step, or restart the installer."))
 | 
			
		|||
                            #:key (users '()))
 | 
			
		||||
  (clear-screen)
 | 
			
		||||
  (newt-suspend)
 | 
			
		||||
  ;; XXX: Force loading 'bold' font files before mouting the
 | 
			
		||||
  ;; cow-store. Otherwise, if the file is loaded by kmscon after the cow-store
 | 
			
		||||
  ;; in mounted, it will be necessary to kill kmscon to umount to cow-store.
 | 
			
		||||
  (display
 | 
			
		||||
   (colorize-string
 | 
			
		||||
    (format #f (G_ "Installing Guix System ...~%"))
 | 
			
		||||
    (color BOLD)))
 | 
			
		||||
  (let ((install-ok? (install-system locale #:users users)))
 | 
			
		||||
    (newt-resume)
 | 
			
		||||
    install-ok?))
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Reference in a new issue