From 58a0f6c434be7d0c892242909572a3de42f9f26d Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Sun, 3 Aug 1997 07:45:34 -0700
Subject: [PATCH] map fixed again

Rev: lib/modules/Array.pmod:1.3
---
 lib/modules/Array.pmod | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lib/modules/Array.pmod b/lib/modules/Array.pmod
index b16aad3d64..f250f10f76 100644
--- a/lib/modules/Array.pmod
+++ b/lib/modules/Array.pmod
@@ -5,11 +5,11 @@ mixed map(mixed arr, mixed fun, mixed ... args)
   int e;
   mixed *ret;
 
-  switch(sprintf("%t",fun))
-  {
-  case "mapping":
+  if(mappingp(arr))
     return mkmapping(indices(arr),map(values(arr),fun,@args));
 
+  switch(sprintf("%t",fun))
+  {
   case "int":
     return arr(@args);
 
-- 
GitLab