You can not select more than 25 topics
			Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
		
		
		
		
		
			
		
			
				
					
					
						
							43 lines
						
					
					
						
							1.1 KiB
						
					
					
				
			
		
		
		
			
			
			
				
					
				
				
					
				
			
		
		
	
	
							43 lines
						
					
					
						
							1.1 KiB
						
					
					
				| #' Access files in the current app | |
| #'  | |
| #' NOTE: If you manually change your package name in the DESCRIPTION,  | |
| #' don't forget to change it here too, and in the config file.  | |
| #' For a safer name change mechanism, use the `golem::set_golem_name()` function. | |
| #'  | |
| #' @param ... character vectors, specifying subdirectory and file(s)  | |
| #' within your package. The default, none, returns the root of the app.  | |
| #'  | |
| #' @noRd | |
| app_sys <- function(...){ | |
|   system.file(..., package = "aquacollect") | |
| } | |
| 
 | |
| 
 | |
| #' Read App Config | |
| #'  | |
| #' @param value Value to retrieve from the config file.  | |
| #' @param config GOLEM_CONFIG_ACTIVE value. If unset, R_CONFIG_ACTIVE.  | |
| #' If unset, "default". | |
| #' @param use_parent Logical, scan the parent directory for config file. | |
| #'  | |
| #' @noRd | |
| get_golem_config <- function( | |
|   value,  | |
|   config = Sys.getenv( | |
|     "GOLEM_CONFIG_ACTIVE",  | |
|     Sys.getenv( | |
|       "R_CONFIG_ACTIVE",  | |
|       "default" | |
|     ) | |
|   ),  | |
|   use_parent = TRUE | |
| ){ | |
|   config::get( | |
|     value = value,  | |
|     config = config,  | |
|     # Modify this if your config file is somewhere else: | |
|     file = app_sys("golem-config.yml"),  | |
|     use_parent = use_parent | |
|   ) | |
| } | |
| 
 | |
| 
 |