guix/guix
3
4
Fork 0
mirror of git://git.savannah.gnu.org/guix.git synced 2023-12-14 03:33:07 +01:00
Code Issues Releases Wiki Activity

vm-image: Use the actual file name of the current file.

Browse source 
* gnu/system/examples/vm-image.tmpl (this-file): Use 'basename' and
'current-source-location'.
This commit is contained in:
Ludovic Courtès 2019-04-26 16:47:11 +02:00
parent 272db5bcf5
commit 1ac6c33cae
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
gnu/system/examples/vm-image.tmpl
View file

@ -22,7 +22,8 @@ accounts.\x1b[0m
"))
(define this-file
(local-file "./vm-image.tmpl" "config.scm"))
(local-file (basename (assoc-ref (current-source-location) 'filename))
"config.scm"))
(operating-system