--- a/Breakpoint.st	Tue Jun 25 11:19:34 2019 +0200
+++ b/Breakpoint.st	Wed Jun 26 20:02:58 2019 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 2006 by eXept Software AG
               All Rights Reserved
@@ -218,18 +216,23 @@
             "/ in:sender.
     ].
     (description shouldTraceIn:sender) ifTrue:[
-        Transcript 
-            show:Timestamp now;
-            showCR:(' Trace %1 [%2] args: %3' 
+        Transcript show:Timestamp now.
+        sender method numArgs == 0 ifTrue:[
+            Transcript showCR:(' Trace: %1 [%2]' 
+                        bindWith:sender methodPrintString 
+                        with:self line)
+        ] ifFalse:[    
+            Transcript showCR:(' Trace: %1 [%2] args: %3' 
                         bindWith:sender methodPrintString 
                         with:self line
                         with:sender argsDisplayStringShort)
+        ].
     ].
 
     "Created: / 15-06-2011 / 12:48:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 11-07-2011 / 18:17:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 21-10-2017 / 15:24:35 / cg"
-    "Modified: / 13-03-2019 / 21:16:22 / Claus Gittinger"
+    "Modified: / 26-06-2019 / 19:19:24 / Claus Gittinger"
 ! !
 
 !Breakpoint methodsFor:'initialization'!