slight rewording

svn: r11981
2008-10-08 16:58:58 +00:00 · 2008-10-08 16:58:58 +00:00 · 5ca6b68617
commit 5ca6b68617
parent 77ef410ea8
1 changed files with 1 additions and 1 deletions
--- a/collects/scheme/private/contract-guts.ss
+++ b/collects/scheme/private/contract-guts.ss
@ -180,7 +180,7 @@
  (define (add-modifiers-to-contract modifiers contract-str)
    (if (null? modifiers)
        contract-str
-        (string-append "from " 
+        (string-append "for " 
                       (apply string-append (add-between modifiers " of "))
                       " in " contract-str)))
  (let ([blame-src (src-info-as-string src-info)]