From 34afef1c38df434bf71a286c1f85234be2ecf7c3 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Mon, 31 Jul 2017 17:33:14 -0600
Subject: [PATCH] fix an error message

---
 racket/src/racket/src/string.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/racket/src/racket/src/string.c b/racket/src/racket/src/string.c
index d6beac752d..818394ac16 100644
--- a/racket/src/racket/src/string.c
+++ b/racket/src/racket/src/string.c
@@ -2214,7 +2214,7 @@ static Scheme_Object *sch_putenv(int argc, Scheme_Object *argv[])
       else {
         scheme_raise_exn(MZEXN_FAIL,
                          "environment-variables-set!: change failed\n"
-                         "  system error: %E");
+                         "  system error: %R");
       }
     }