diff options
| -rw-r--r-- | guix/ui.scm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/guix/ui.scm b/guix/ui.scm index 8d7bc238bc..d5327a5b08 100644 --- a/guix/ui.scm +++ b/guix/ui.scm @@ -435,6 +435,7 @@ exiting. ARGS is the list of arguments received by the 'throw' handler." (gettext (condition-message obj) %gettext-domain))) ((formatted-message? obj) (warning (G_ "failed to load '~a': ~a~%") + file (apply format #f (gettext (formatted-message-string obj) %gettext-domain) |