ComboBrowseView.st
changeset 3150 e3a55f15ef7e
parent 1283 60bd413544f4
child 4770 6634b540fea2
--- a/ComboBrowseView.st	Fri Nov 10 07:20:31 2006 +0100
+++ b/ComboBrowseView.st	Mon Nov 13 17:11:31 2006 +0100
@@ -1,6 +1,6 @@
 "
  COPYRIGHT (c) 1998 by eXept Software AG
-              All Rights Reserved
+	      All Rights Reserved
 
  This software is furnished under a license and may be used
  only in accordance with the terms of that license and with the
@@ -10,7 +10,7 @@
  hereby transferred.
 "
 
-
+"{ Package: 'stx:libwidg2' }"
 
 ComboBoxView subclass:#ComboBrowseView
 	instanceVariableNames:'browseAction'
@@ -24,7 +24,7 @@
 copyright
 "
  COPYRIGHT (c) 1998 by eXept Software AG
-              All Rights Reserved
+	      All Rights Reserved
 
  This software is furnished under a license and may be used
  only in accordance with the terms of that license and with the
@@ -45,14 +45,14 @@
     method.
 
     [author:]
-        Claus Gittinger
+	Claus Gittinger
 "
 !
 
 examples
 "
   non MVC operation:
-                                                                        [exBegin]
+									[exBegin]
      |top b|
 
      top := StandardSystemView new.
@@ -63,12 +63,12 @@
      b bottomInset:(b preferredExtent y negated).
 
      top open.
-                                                                        [exEnd]
+									[exEnd]
 
 
 
   model operation:
-                                                                        [exBegin]
+									[exBegin]
      |model top b|
 
      model := 'foo' asValue.
@@ -84,7 +84,7 @@
 
      top openModal.
      Transcript showCR:('entered value: ' , model value).
-                                                                        [exEnd]
+									[exEnd]
 "
 
 ! !
@@ -142,7 +142,7 @@
     s := browseAction value.
     pullDownButton turnOff.
     s notNil ifTrue:[
-        field contents:s.
+	field contents:s.
     ]
 
     "Created: / 13.10.1998 / 16:40:56 / cg"
@@ -152,5 +152,5 @@
 !ComboBrowseView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/ComboBrowseView.st,v 1.3 1999-03-25 15:37:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/ComboBrowseView.st,v 1.4 2006-11-13 16:11:29 cg Exp $'
 ! !