Added accessors #message and #buttons.
authorJan Vrany <jan.vrany@fit.cvut.cz>
Tue, 03 Mar 2015 11:42:31 +0100
changeset 15500 3822905f9e58
parent 15499 387151a8648c
child 15501 46e2abb0c3e2
Added accessors #message and #buttons. Mostly for tests...
Tools__InlineMessageDialog.st
--- a/Tools__InlineMessageDialog.st	Mon Mar 02 17:53:28 2015 +0100
+++ b/Tools__InlineMessageDialog.st	Tue Mar 03 11:42:31 2015 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  Copyright (c) 2007-2010 Jan Vrany, SWING Research Group, Czech Technical University in Prague
  Copyright (c) 2009-2010 eXept Software AG
@@ -318,7 +320,7 @@
 !InlineMessageDialog class methodsFor:'others'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__InlineMessageDialog.st,v 1.16 2014-12-19 01:34:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__InlineMessageDialog.st,v 1.17 2015-03-03 10:42:31 vrany Exp $'
 ! !
 
 !InlineMessageDialog methodsFor:'accessing'!
@@ -335,6 +337,25 @@
     "Created: / 10-04-2012 / 19:38:31 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
+buttons
+    panelView isNil ifTrue:[ ^ #() ].
+    ^ OrderedCollection streamContents:[ :s |
+        panelView allSubViewsDo:[:v |
+            (v class == Button or:[ v class == LinkButton ]) ifTrue:[ 
+                s nextPut: v
+            ].
+        ]
+    ]
+
+    "Created: / 03-03-2015 / 10:10:13 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+message
+    ^ self messageHolder value
+
+    "Created: / 03-03-2015 / 10:06:58 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 message: aString
 
     self messageHolder value: aString
@@ -980,7 +1001,7 @@
 !InlineMessageDialog class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__InlineMessageDialog.st,v 1.16 2014-12-19 01:34:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__InlineMessageDialog.st,v 1.17 2015-03-03 10:42:31 vrany Exp $'
 !
 
 version_HG
@@ -989,6 +1010,6 @@
 !
 
 version_SVN
-    ^ '$Id: Tools__InlineMessageDialog.st,v 1.16 2014-12-19 01:34:01 cg Exp $'
+    ^ '$Id: Tools__InlineMessageDialog.st,v 1.17 2015-03-03 10:42:31 vrany Exp $'
 ! !