--- a/FlyByHelp.st	Fri Jul 26 12:09:15 2019 +0200
+++ b/FlyByHelp.st	Sat Jul 27 11:50:02 2019 +0200
@@ -143,7 +143,7 @@
 
         m := Menu new.
         m addItem:(MenuItem 
-            label:(((aView fullName ? 'unnamed')) withColor:Color grey)).
+            label:(((aView fullXPath ? 'unnamed') contractTo:120) withColor:Color grey)).
 
         aView isMenu ifTrue:[
             menuItem := aView itemAtPoint:aPoint.