*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Fri, 19 Jul 1996 20:49:29 +0200
changeset 222 11fce0339069
parent 221 976e5a608dfb
child 223 4744780ae88d
*** empty log message ***
HSlider.st
HorizontalSlider.st
--- a/HSlider.st	Thu Jul 18 18:15:59 1996 +0200
+++ b/HSlider.st	Fri Jul 19 20:49:29 1996 +0200
@@ -57,6 +57,8 @@
 
     |w h|
 
+    "/ If I have an explicit preferredExtent ..
+
     preferredExtent notNil ifTrue:[
         ^ preferredExtent
     ].
@@ -67,11 +69,11 @@
     preferredExtent := w @ h.
     ^ preferredExtent.
 
-    "Modified: 15.7.1996 / 09:56:39 / cg"
+    "Modified: 19.7.1996 / 20:44:30 / cg"
 ! !
 
 !HorizontalSlider  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/Attic/HSlider.st,v 1.12 1996-07-15 10:09:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/Attic/HSlider.st,v 1.13 1996-07-19 18:49:29 cg Exp $'
 ! !
--- a/HorizontalSlider.st	Thu Jul 18 18:15:59 1996 +0200
+++ b/HorizontalSlider.st	Fri Jul 19 20:49:29 1996 +0200
@@ -57,6 +57,8 @@
 
     |w h|
 
+    "/ If I have an explicit preferredExtent ..
+
     preferredExtent notNil ifTrue:[
         ^ preferredExtent
     ].
@@ -67,11 +69,11 @@
     preferredExtent := w @ h.
     ^ preferredExtent.
 
-    "Modified: 15.7.1996 / 09:56:39 / cg"
+    "Modified: 19.7.1996 / 20:44:30 / cg"
 ! !
 
 !HorizontalSlider  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/HorizontalSlider.st,v 1.12 1996-07-15 10:09:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/HorizontalSlider.st,v 1.13 1996-07-19 18:49:29 cg Exp $'
 ! !