From e87a278a3b0fef13129264dc98db28a31ad6b49e Mon Sep 17 00:00:00 2001
From: zbigniew <zbigniewsz@gmail.com>
Date: Tue, 10 Aug 2010 19:47:25 -0500
Subject: [PATCH] setup-api: $system error message should not use formatting directives
---
setup-api.scm | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
diff --git a/setup-api.scm b/setup-api.scm
index 7de6ef2..f012bec 100644
a
|
b
|
|
803 | 803 | (string-append "\"" str "\"") ; (sic) thanks to Matthew Flatt |
804 | 804 | str)))) |
805 | 805 | (unless (zero? r) |
806 | | (error "shell command failed with nonzero exit status ~a:~%~% ~a" r str)))) |
| 806 | (error "shell command failed with nonzero exit status" r str)))) |
807 | 807 | |
808 | 808 | (define (setup-error-handling) |
809 | 809 | (current-exception-handler |