--- a/Tools__SearchDialog.st	Fri Jul 04 12:27:24 2014 +0200
+++ b/Tools__SearchDialog.st	Fri Jul 04 12:27:35 2014 +0200
@@ -289,7 +289,7 @@
                     (sel startsWith:'#''') ifTrue:[
                         sel := sel copyFrom:3.
                         (sel endsWith:$') ifTrue:[
-                            sel := sel copyButLast:1.
+                            sel := sel copyButLast.
                         ].
                     ].
                 ]
@@ -1405,11 +1405,11 @@
 !SearchDialog class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__SearchDialog.st,v 1.80 2014-03-05 14:52:44 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__SearchDialog.st,v 1.81 2014-07-04 10:27:35 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__SearchDialog.st,v 1.80 2014-03-05 14:52:44 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__SearchDialog.st,v 1.81 2014-07-04 10:27:35 cg Exp $'
 ! !