diff --git a/src/NewTools-Sindarin-Commands/SindarinCopyOsInfo.class.st b/src/NewTools-Sindarin-Commands/SindarinCopyOsInfo.class.st new file mode 100644 index 000000000..ad0639c98 --- /dev/null +++ b/src/NewTools-Sindarin-Commands/SindarinCopyOsInfo.class.st @@ -0,0 +1,41 @@ +Class { + #name : 'SindarinCopyOsInfo', + #superclass : 'SindarinCommand', + #category : 'NewTools-Sindarin-Commands', + #package : 'NewTools-Sindarin-Commands' +} + +{ #category : 'default' } +SindarinCopyOsInfo class >> defaultDescription [ + + ^ 'Copy to clipboard system information and Pharo image version' +] + +{ #category : 'initialization' } +SindarinCopyOsInfo class >> defaultIconName [ + ^#smallCopy +] + +{ #category : 'default' } +SindarinCopyOsInfo class >> defaultName [ + + + ^ 'Copy system information' +] + +{ #category : 'executing' } +SindarinCopyOsInfo >> execute [ + +Clipboard clipboardText: self systemInfo. +] + +{ #category : 'as yet unclassified' } +SindarinCopyOsInfo >> systemInfo [ + + ^ Smalltalk os platformName, + Smalltalk os version , + Character space asString , + Smalltalk os subtype , + Character cr asString, + Smalltalk image lastUpdateString +]