Christoph Thiede uploaded a new version of CommandLine to project The Trunk:
http://source.squeak.org/trunk/CommandLine-ct.20.mcz

==================== Summary ====================

Name: CommandLine-ct.20
Author: ct
Time: 30 January 2022, 9:21:36.067317 pm
UUID: bb7e6423-0356-4a58-836c-0bc6f08c412b
Ancestors: CommandLine-TheresaHMartenK.17

Honors optional arguments in CommandLineToolSet class>>#debugProcess:context:label:contents:fullView:.

=============== Diff against CommandLine-TheresaHMartenK.17 ===============

Item was changed:
  ----- Method: CommandLineToolSet class>>debugProcess:context:label:contents:fullView: (in category 'debugging') -----
+ debugProcess: aProcess context: aContext label: aStringOrNil contents: contentsOrNil fullView: aBool
- debugProcess: aProcess context: aContext label: aString contents: contents fullView: aBool
  	"We can't open a command line debugger, so just log the error and carry on."
  
  	| s |
  	s := FileStream stderr.
+ 	s nextPutAll: self className.
+ 	aStringOrNil ifNotNil: [
+ 		s
+ 			nextPutAll: ': ';
+ 			nextPutAll: aStringOrNil].
+ 	s cr.
+ 	contentsOrNil ifNotNil: [
+ 		s
+ 			nextPutAll: contentsOrNil;
+ 			cr].
- 	s
- 		nextPutAll: self className;
- 		nextPutAll: ': ';
- 		nextPutAll: aString;
- 		cr;
- 		nextPutAll: contents;
- 		cr.
  	(aContext stackOfSize: 20) do: [:ctx | ctx printOn: s. s cr].
  	s flush.!