From ff9f9df12fbe71b30113015abaf636d758e59009 Mon Sep 17 00:00:00 2001
From: Fredrik Noring <noring@nocrew.org>
Date: Thu, 18 Jun 1998 15:21:34 +0200
Subject: [PATCH] Added unit function to where().

Rev: lib/modules/ADT.pmod/Table.pmod:1.7
---
 lib/modules/ADT.pmod/Table.pmod | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/modules/ADT.pmod/Table.pmod b/lib/modules/ADT.pmod/Table.pmod
index 8796279f45..ff3f28f9be 100644
--- a/lib/modules/ADT.pmod/Table.pmod
+++ b/lib/modules/ADT.pmod/Table.pmod
@@ -1,5 +1,5 @@
 // Table.pmod by Fredrik Noring, 1998
-// $Id: Table.pmod,v 1.6 1998/05/09 22:38:58 noring Exp $
+// $Id: Table.pmod,v 1.7 1998/06/18 13:21:34 noring Exp $
 
 #define TABLE_ERR(msg) throw(({ "(Table) "+msg+"\n", backtrace() }))
 
@@ -156,6 +156,7 @@ class table {
   object where(array(int|string)|int|string cs, function f, mixed ... args)
   {
     array t = ({});
+    f = f || lambda(mixed x) { return x; };
     cs = remap(arrayp(cs)?cs:({ cs }));
     foreach(table, mixed row)
       if(f(@rows(row, cs), @args))
-- 
GitLab