system: Adjust the set of fields with default values.
* gnu/system.scm (<operating-system>)[file-systems]: Remove default. [locale]: Add default value.
This commit is contained in:
		
							parent
							
								
									b25937e318
								
							
						
					
					
						commit
						8a6d273137
					
				
					 1 changed files with 3 additions and 3 deletions
				
			
		| 
						 | 
					@ -87,8 +87,7 @@
 | 
				
			||||||
 | 
					
 | 
				
			||||||
  (host-name operating-system-host-name)          ; string
 | 
					  (host-name operating-system-host-name)          ; string
 | 
				
			||||||
 | 
					
 | 
				
			||||||
  (file-systems operating-system-file-systems     ; list of fs
 | 
					  (file-systems operating-system-file-systems)    ; list of fs
 | 
				
			||||||
                (default '()))
 | 
					 | 
				
			||||||
 | 
					
 | 
				
			||||||
  (users operating-system-users                   ; list of user accounts
 | 
					  (users operating-system-users                   ; list of user accounts
 | 
				
			||||||
         (default '()))
 | 
					         (default '()))
 | 
				
			||||||
| 
						 | 
					@ -104,7 +103,8 @@
 | 
				
			||||||
            (default %base-packages))             ; or just PACKAGE
 | 
					            (default %base-packages))             ; or just PACKAGE
 | 
				
			||||||
 | 
					
 | 
				
			||||||
  (timezone operating-system-timezone)            ; string
 | 
					  (timezone operating-system-timezone)            ; string
 | 
				
			||||||
  (locale   operating-system-locale)              ; string
 | 
					  (locale   operating-system-locale               ; string
 | 
				
			||||||
 | 
					            (default "en_US.UTF-8"))
 | 
				
			||||||
 | 
					
 | 
				
			||||||
  (services operating-system-user-services        ; list of monadic services
 | 
					  (services operating-system-user-services        ; list of monadic services
 | 
				
			||||||
            (default %base-services))
 | 
					            (default %base-services))
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
		Reference in a new issue