From b38cb3e75260bd7bc9604faf998c49f5c46f1697 Mon Sep 17 00:00:00 2001
From: Martin Stjernholm <mast@lysator.liu.se>
Date: Tue, 9 Sep 2003 19:04:06 +0200
Subject: [PATCH] Cleanup.

Rev: lib/master.pike.in:1.298
---
 lib/master.pike.in | 13 ++-----------
 1 file changed, 2 insertions(+), 11 deletions(-)

diff --git a/lib/master.pike.in b/lib/master.pike.in
index a8228550b5..807f0b4a87 100644
--- a/lib/master.pike.in
+++ b/lib/master.pike.in
@@ -6,7 +6,7 @@
 // Pike is distributed under GPL, LGPL and MPL. See the file COPYING
 // for more information.
 //
-// $Id: master.pike.in,v 1.297 2003/09/09 16:57:34 mast Exp $
+// $Id: master.pike.in,v 1.298 2003/09/09 17:04:06 mast Exp $
 
 #pike __REAL_VERSION__
 
@@ -2892,16 +2892,7 @@ string describe_object(object o)
       if (objectp (tmp)) parent_obj = tmp;
 
       /* Try finding ourselves in parent_obj. */
-      int i;
-      if (object_program(o)) {
-	i = search(values(parent_obj), o);
-      } else {
-	i = search(map(values(parent_obj),
-		       lambda(mixed x) {
-			 if (program p = object_program(x)) return p;
-			 return 0;
-		       }), (mixed) o);
-      }
+      int i = search(values(parent_obj), o);
       if (i >= 0) {
 	s = [string]indices(parent_obj)[i];
 	return describe_module(parent_obj) + s;
-- 
GitLab