From 0cccedabb451f078eff1de0ef5d58a0d4d54bb81 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Fri, 17 Jul 2009 11:08:39 +0000
Subject: [PATCH] export Scheme-implemented ormap (for 1 and 2 lists), which
 was accidentally unexported before

svn: r15471
---
 collects/scheme/private/map.ss | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/collects/scheme/private/map.ss b/collects/scheme/private/map.ss
index 682747f0b4..fa19f2edb3 100644
--- a/collects/scheme/private/map.ss
+++ b/collects/scheme/private/map.ss
@@ -8,7 +8,8 @@
 
   (#%provide (rename map2 map)
              (rename for-each2 for-each)
-             (rename andmap2 andmap))
+             (rename andmap2 andmap)
+             (rename ormap2 ormap))
   
   ;; -------------------------------------------------------------------------