ui: Fix format string in `warning'.

* guix/ui.scm (warning)[augmented-format-string]: Add missing ~*.
2013-04-17 18:02:48 +02:00 · 2013-04-17 18:02:48 +02:00 · 801486fe46
parent dd36b51bf7
commit 801486fe46
1 changed files with 1 additions and 1 deletions
--- a/guix/ui.scm
+++ b/guix/ui.scm
@ -381,7 +381,7 @@ WIDTH columns."
    ;; All this just to preserve `-Wformat' warnings.  Too much?

    (define (augmented-format-string fmt)
-      (string-append "~:[~;guix ~a: ~]~a" (syntax->datum fmt)))
+      (string-append "~:[~*~;guix ~a: ~]~a" (syntax->datum fmt)))

    (define prefix
      #'(_ "warning: "))