--- a/PopUpList.st	Tue Aug 26 17:32:48 1997 +0200
+++ b/PopUpList.st	Tue Aug 26 17:38:03 1997 +0200
@@ -546,6 +546,14 @@
     defaultLabel := label
 !
 
+useIndex
+    "tell the popuplist to pass the index (instead of the value)
+     to both the actionBlock and model. Notice, that if you use a model,
+     the default changeSelector is not ok for using index and a SelectionInList"
+
+    ^ useIndex
+!
+
 useIndex:aBoolean 
     "tell the popuplist to pass the index (instead of the value)
      to both the actionBlock and model. Notice, that if you use a model,
@@ -939,5 +947,5 @@
 !PopUpList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/PopUpList.st,v 1.50 1997-06-04 11:33:43 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/PopUpList.st,v 1.51 1997-08-26 15:38:03 ca Exp $'
 ! !