Replace calls to (getenv "BRIEFCASE") with constants/briefcase
I would prefer to define constants/briefcase in terms of `(getenv "BRIEFCASE")` and assert that `(f-exists? (getenv "BRIEFCASE"))`, in one location: constants.el
This commit is contained in:
		
							parent
							
								
									21ce27b0ca
								
							
						
					
					
						commit
						8eed16dc67
					
				
					 4 changed files with 17 additions and 10 deletions
				
			
		|  | @ -9,8 +9,7 @@ | |||
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | ||||
| 
 | ||||
| (require 'device) | ||||
| 
 | ||||
| (prelude/assert (f-exists? (getenv "BRIEFCASE"))) | ||||
| (require 'constants) | ||||
| 
 | ||||
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | ||||
| ;; Library | ||||
|  | @ -28,7 +27,7 @@ | |||
|          (bname (format "*%s*" pname))) | ||||
|     (start-process pname bname | ||||
|                    "nix-env" | ||||
|                    "-I" (format "briefcase=%s" (getenv "BRIEFCASE")) | ||||
|                    "-I" (format "briefcase=%s" constants/briefcase) | ||||
|                    "-f" "<briefcase>" "-iA" emacs) | ||||
|     (display-buffer bname))) | ||||
| 
 | ||||
|  |  | |||
		Loading…
	
	Add table
		Add a link
		
	
		Reference in a new issue