--- a/GnuplotGraphView.st Tue May 01 10:48:57 2018 +0200
+++ b/GnuplotGraphView.st Tue May 01 10:52:22 2018 +0200
@@ -50,11 +50,16 @@
top := StandardSystemView new.
top extent:300@300.
- v := GnuplotGraphView new.
- v origin:10@10 corner:150@150.
+ v := GnuplotGraphView new.
+ v data:(Random new next:100).
+ v origin:0.0@0.0 corner:1.0@1.0.
top add:v.
top open
[exEnd]
+ use as inspect tab:
+ [exBegin]
+ (Random new next:100) inspect.
+ [exEnd]
"
! !
@@ -382,6 +387,14 @@
self invalidate
! !
+!GnuplotGraphView methodsFor:'mvc'!
+
+updateFromModel
+ "the model changes, set my image"
+
+ self data:model value.
+! !
+
!GnuplotGraphView class methodsFor:'documentation'!
version