stupid typo in #:flag

svn: r15090 original commit: e2c5ff30ed5cffac9752db1dd4f1e93bd596b1fe
2009-06-05 13:03:44 +00:00 · 2009-06-05 13:03:44 +00:00 · 65b38b778b
commit 65b38b778b
parent 1e2e38be43 ffb4f75f4a 8141fbd5cb 3fe9ae3193
1 changed files with 1 additions and 1 deletions
--- a/collects/mzlib/kw.ss
+++ b/collects/mzlib/kw.ss
@ -414,7 +414,7 @@
                               (cadr xs)
                               (loop (cddr xs)))
                        xs))
-                sx))))
+                xs))))
    ;; ------------------------------------------------------------------------
    ;; generates the part of the body that deals with rest-related stuff
    (define (make-keys-body expr)