Fix drawing if newspace is 0.
--- a/MemMonitor.st Wed Feb 03 16:41:51 1999 +0100
+++ b/MemMonitor.st Wed Feb 03 17:04:56 1999 +0100
@@ -329,8 +329,12 @@
self displayLineFromX:x y:y1 toX:x y:y3.
y1 := y2 - hNew.
- self paint:newColor.
- self displayLineFromX:x y:y1 toX:x y:y2.
+ y1 ~= y2 ifTrue:[
+ self paint:newColor.
+ self displayLineFromX:x y:y1 toX:x y:y2.
+ ]
+
+ "Modified: / 29.1.1999 / 20:45:07 / stefan"
!
updateNumbers
@@ -974,5 +978,5 @@
!MemoryMonitor class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Attic/MemMonitor.st,v 1.59 1998-09-24 10:46:39 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Attic/MemMonitor.st,v 1.60 1999-02-03 16:04:56 stefan Exp $'
! !
--- a/MemoryMonitor.st Wed Feb 03 16:41:51 1999 +0100
+++ b/MemoryMonitor.st Wed Feb 03 17:04:56 1999 +0100
@@ -329,8 +329,12 @@
self displayLineFromX:x y:y1 toX:x y:y3.
y1 := y2 - hNew.
- self paint:newColor.
- self displayLineFromX:x y:y1 toX:x y:y2.
+ y1 ~= y2 ifTrue:[
+ self paint:newColor.
+ self displayLineFromX:x y:y1 toX:x y:y2.
+ ]
+
+ "Modified: / 29.1.1999 / 20:45:07 / stefan"
!
updateNumbers
@@ -974,5 +978,5 @@
!MemoryMonitor class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/MemoryMonitor.st,v 1.59 1998-09-24 10:46:39 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/MemoryMonitor.st,v 1.60 1999-02-03 16:04:56 stefan Exp $'
! !