X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fbackend-library.scm;h=b58d8aca89ef4382f967463f82e5f67366597799;hb=86713eefa608f7dc738420ce0225c2a92c4539b2;hp=93cd2c02d8b3e2ce30f38c851f7f5d06547f6edb;hpb=f8702402e51201a2078672532c02b18a31442818;p=lilypond.git diff --git a/scm/backend-library.scm b/scm/backend-library.scm index 93cd2c02d8..b58d8aca89 100644 --- a/scm/backend-library.scm +++ b/scm/backend-library.scm @@ -24,10 +24,7 @@ (ice-9 optargs)) (define-public (ly:system command) - (if (ly:get-option 'verbose) - (begin - (ly:message (_ "Invoking `~a'...") (string-join command))) - (ly:progress "\n")) + (ly:debug (_ "Invoking `~a'...") (string-join command)) (let ((status (apply ly:spawn command))) (if (> status 0) (begin