From: Matt Birkholz <matt@birkholz.chandler.az.us>
Date: Fri, 19 Aug 2011 15:44:12 +0000 (-0700)
Subject: Typo.
X-Git-Tag: mit-scheme-pucked-9.2.12~627
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=c0c4dcb892644b2f723995135d09f52f3cc26b0a;p=mit-scheme.git

Typo.
---

diff --git a/src/gtk/gio.scm b/src/gtk/gio.scm
index 04ccd89d4..cd66164a3 100644
--- a/src/gtk/gio.scm
+++ b/src/gtk/gio.scm
@@ -1145,7 +1145,7 @@ USA.
 		 " "(gfile-uri gfile)
 		 " "gmountop
 		 " "(c-peek-cstring message)
-		 " "(peek-gstrv! chooices)"\n")
+		 " "(peek-gstrv! choices)"\n")
     (warn "Unimplemented" 'mount-question-callback)))
 
 (define (peek-gstrv! alien)