mirror of
				https://codeberg.org/hako/Rosenthal.git
				synced 2025-11-03 19:24:37 +00:00 
			
		
		
		
	Add (rosenthal) module.
* modules/rosenthal.scm: New file.
This commit is contained in:
		
							parent
							
								
									aa858e4b87
								
							
						
					
					
						commit
						b084fdae98
					
				
							
								
								
									
										32
									
								
								modules/rosenthal.scm
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										32
									
								
								modules/rosenthal.scm
									
									
									
									
									
										Normal file
									
								
							@ -0,0 +1,32 @@
 | 
				
			|||||||
 | 
					;;; SPDX-FileCopyrightText: 2025 Hilton Chain <hako@ultrarare.space>
 | 
				
			||||||
 | 
					;;;
 | 
				
			||||||
 | 
					;;; SPDX-License-Identifier: GPL-3.0-or-later
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					(define-module (rosenthal))
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					;; Re-export commonly-used modules.
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					(eval-when (eval load compile)
 | 
				
			||||||
 | 
					  (begin
 | 
				
			||||||
 | 
					    (define %public-modules
 | 
				
			||||||
 | 
					      '((gnu)
 | 
				
			||||||
 | 
					        (guix utils)
 | 
				
			||||||
 | 
					        (rosenthal utils file)
 | 
				
			||||||
 | 
					        (rosenthal utils packages)
 | 
				
			||||||
 | 
					        (rosenthal utils transformations)
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					        (gnu services desktop)
 | 
				
			||||||
 | 
					        (gnu services guix)
 | 
				
			||||||
 | 
					        (gnu services shepherd)
 | 
				
			||||||
 | 
					        (rosenthal services base)
 | 
				
			||||||
 | 
					        (rosenthal services desktop)
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					        (gnu home)
 | 
				
			||||||
 | 
					        (gnu home services)
 | 
				
			||||||
 | 
					        (gnu home services desktop)
 | 
				
			||||||
 | 
					        (gnu home services shepherd)))
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					    (for-each (let ((i (module-public-interface (current-module))))
 | 
				
			||||||
 | 
					                (lambda (m)
 | 
				
			||||||
 | 
					                  (module-use! i (resolve-interface m))))
 | 
				
			||||||
 | 
					              %public-modules)))
 | 
				
			||||||
		Loading…
	
		Reference in New Issue
	
	Block a user