tjh.dev
nixpkgs mirror (for testing)
github.com/NixOS/nixpkgs
nix
1#lang racket/base
2(require
3 racket/function
4 racket/list
5 racket/pretty
6 racket/string
7 setup/dirs
8 )
9
10(define config-file (build-path (find-config-dir) "config.rktd"))
11
12(define lib-paths
13 ((compose remove-duplicates
14 (curry map (curryr string-trim "-L" #:right? #f))
15 (curry filter (curryr string-prefix? "-L"))
16 string-split)
17 (getenv "NIX_LDFLAGS")))
18
19(define config
20 (let* ([prev-config (read-installation-configuration-table)]
21 [prev-lib-search-dirs (hash-ref prev-config 'lib-search-dirs '(#f))]
22 [lib-search-dirs (remove-duplicates (append lib-paths prev-lib-search-dirs))])
23 (hash-set prev-config 'lib-search-dirs lib-search-dirs)))
24
25(call-with-output-file config-file
26 #:exists 'replace
27 (curry pretty-write config))