diff options
| author | Marius Bakke <mbakke@fastmail.com> | 2019-03-14 16:30:19 +0100 |
|---|---|---|
| committer | Marius Bakke <mbakke@fastmail.com> | 2019-03-14 16:30:19 +0100 |
| commit | 19008a22d18e772062952034c58a15ed341df3b5 (patch) | |
| tree | 3a7fb9b4abe5cbac3f7edd5d5c76abd993fad255 /gnu/services/configuration.scm | |
| parent | 520ae432d446010ed6a5233c8abfda88a945926c (diff) | |
| parent | c958c31caefb20c32cf89caea7d4668d7021a92b (diff) | |
| download | patches-19008a22d18e772062952034c58a15ed341df3b5.tar patches-19008a22d18e772062952034c58a15ed341df3b5.tar.gz | |
Merge branch 'staging' into core-updates
Diffstat (limited to 'gnu/services/configuration.scm')
| -rw-r--r-- | gnu/services/configuration.scm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/gnu/services/configuration.scm b/gnu/services/configuration.scm index 707944cbe0..90f12a8d39 100644 --- a/gnu/services/configuration.scm +++ b/gnu/services/configuration.scm @@ -22,6 +22,7 @@ #:use-module (guix packages) #:use-module (guix records) #:use-module (guix gexp) + #:use-module ((guix utils) #:select (source-properties->location)) #:autoload (texinfo) (texi-fragment->stexi) #:autoload (texinfo serialize) (stexi->texi) #:use-module (ice-9 match) @@ -129,6 +130,10 @@ #,(id #'stem #'% #'stem) #,(id #'stem #'make- #'stem) #,(id #'stem #'stem #'?) + (%location #,(id #'stem #'-location) + (default (and=> (current-source-location) + source-properties->location)) + (innate)) (field field-getter (default def)) ...) (define #,(id #'stem #'stem #'-fields) |