author | Claus Gittinger <cg@exept.de> |
Thu, 09 Nov 2017 22:41:29 +0100 | |
changeset 8220 | d3b0cba62407 |
parent 8219 | 2e7b11bcbcd8 |
child 8221 | fe07baca2fee |
SimpleView.st | file | annotate | diff | comparison | revisions |
--- a/SimpleView.st Thu Nov 09 22:39:46 2017 +0100 +++ b/SimpleView.st Thu Nov 09 22:41:29 2017 +0100 @@ -3977,8 +3977,10 @@ uuidStringOrName |uuid| - (uuid := self uuid) isNil ifTrue: [^ self name]. + (uuid := self automationUUID) isNil ifTrue: [^ self name]. ^ uuid printString + + "Modified: / 09-11-2017 / 22:34:44 / cg" ! view