author | Claus Gittinger <cg@exept.de> |
Sun, 08 May 2016 19:29:51 +0200 | |
changeset 16485 | 8ed4c3714c75 |
parent 16484 | 7724f132ff07 |
child 16486 | eaf396320e74 |
--- a/WorkspaceApplication.st Sun May 08 19:27:04 2016 +0200 +++ b/WorkspaceApplication.st Sun May 08 19:29:51 2016 +0200 @@ -3469,11 +3469,15 @@ ! addStopWatch - |v clock| + |v clockViewClass clock| v := View new. v viewBackground:Color white. - clock := ClockView in:v. + "/ avoid making stx:libwidg3 a prerequisite. + Smalltalk loadPackage:#'stx:libwidg3'. "/ ClockView package + clockViewClass := Smalltalk at:#ClockView. + + clock := clockViewClass in:v. clock beStopWatch. clock