--- a/Tools_SearchDialog.st	Mon Apr 26 15:37:14 2010 +0200
+++ b/Tools_SearchDialog.st	Mon Apr 26 15:40:01 2010 +0200
@@ -924,6 +924,8 @@
     b helpKey:#matchAnyExpression.
     b := Button label:'+Msg' action:[ codeField paste:'`@m:' ] in:metaBox.
     b helpKey:#matchAnyMessage.
+    b := Button label:'+Node' action:[ codeField paste:'`{:node | node isLiteral and:[node value isSymbol] }' ] in:metaBox.
+    b helpKey:#matchAnyNode.
     self addComponent:metaBox.
 
     errMessageField := (self addTextLabel:'') adjust:#left.
@@ -942,7 +944,7 @@
     codeField contents:initial.
     checkCodeAction value.
 
-    "Modified: / 26-04-2010 / 15:08:48 / cg"
+    "Modified: / 26-04-2010 / 15:39:40 / cg"
 !
 
 checkCodeIn:codeField notifying:errMessageField
@@ -1213,9 +1215,9 @@
 !SearchDialog class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_SearchDialog.st,v 1.51 2010-04-26 13:37:14 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_SearchDialog.st,v 1.52 2010-04-26 13:40:01 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_SearchDialog.st,v 1.51 2010-04-26 13:37:14 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_SearchDialog.st,v 1.52 2010-04-26 13:40:01 cg Exp $'
 ! !