[Gd-chatter] r11419 - trunk/libraries/gui-sniffer

[andreas at gwydiondylan.org]

Author: andreas
Date: Wed Jun 27 01:40:32 2007
New Revision: 11419

Modified:
   trunk/libraries/gui-sniffer/gui-sniffer.dylan
Log:
bug: 7299

Some more features work with the GTK backend by now.


Modified: trunk/libraries/gui-sniffer/gui-sniffer.dylan
==============================================================================
--- trunk/libraries/gui-sniffer/gui-sniffer.dylan	(original)
+++ trunk/libraries/gui-sniffer/gui-sniffer.dylan	Wed Jun 27 01:40:32 2007
@@ -224,7 +224,7 @@
 
 define generic apply-filter (frame :: <gui-sniffer-frame>);
 define method apply-filter (frame :: <gui-sniffer-frame>)
-  let filter-string = ""; //gadget-value(frame.filter-field);
+  let filter-string = gadget-value(frame.filter-field);
   let old = frame.filter-expression;
   if (filter-string.size > 0)
     frame.filter-expression := 
@@ -238,7 +238,7 @@
         
     if (old ~= frame.filter-expression & every?(curry(\~=, filter-string), frame.filter-history))
       frame.filter-history := add!(frame.filter-history, filter-string);
-//      gadget-items(frame.filter-field) := frame.filter-history;
+      gadget-items(frame.filter-field) := frame.filter-history;
     end;
   else
     frame.filter-expression := #f;
@@ -432,7 +432,7 @@
   slot ethernet-interface = #f;
   slot first-packet-arrived :: false-or(<date>) = #f;
   slot filter-history :: <list> = make(<list>);
-/*
+
   pane filter-field (frame)
     make(<combo-box>,
          label: "Filter expression",
@@ -446,7 +446,7 @@
       make(<label>, label: "Filter: ");
       frame.filter-field;
     end;
-*/
+
   pane packet-table (frame)
     make(<table-control>,
          headings: #("No", "Time", "Source", "Destination", "Protocol", "Info"),
@@ -512,7 +512,7 @@
                 end);
 
   layout (frame) vertically()
-//                   frame.filter-pane;
+                   frame.filter-pane;
                    make(<column-splitter>,
                         children: vector(frame.packet-table,
                                          frame.packet-tree-view /*,