Differences From Artifact [c11b8481f7]:
- File configf.scm — part of check-in [3129220de0] at 2017-04-25 00:12:12 on branch v1.64 — configf - keep reference to empty sections. NOTE: This breaks several tests but is still correct behavior (user: matt, size: 33433) [annotate] [blame] [check-ins using] [more...]
To Artifact [035be18ade]:
- File
configf.scm
— part of check-in
[669204e634]
at
2017-04-26 14:29:42
on branch v1.64
— MTA fix
CherryPicked backout 70a3. (user: ritikaag, size: 33411) [annotate] [blame] [check-ins using]
| ︙ | ︙ | |||
13 14 15 16 17 18 19 | ;; Config file handling ;;====================================================================== (use regex regex-case) ;; directory-utils) (declare (unit configf)) (declare (uses process)) (declare (uses env)) | < | 13 14 15 16 17 18 19 20 21 22 23 24 25 26 |
;; Config file handling
;;======================================================================
(use regex regex-case) ;; directory-utils)
(declare (unit configf))
(declare (uses process))
(declare (uses env))
(include "common_records.scm")
;; return list (path fullpath configname)
(define (find-config configname #!key (toppath #f))
(if toppath
(let ((cfname (conc toppath "/" configname)))
|
| ︙ | ︙ |