--- a/UISelectionPanel.st	Thu Oct 23 16:44:22 1997 +0200
+++ b/UISelectionPanel.st	Sat Oct 25 01:07:16 1997 +0200
@@ -12,6 +12,8 @@
 
 
 
+'From Smalltalk/X, Version:3.2.1 on 24-oct-1997 at 3:28:04 pm'                  !
+
 ApplicationModel subclass:#UISelectionPanel
 	instanceVariableNames:'userClass userSpecs userLabels majorSelection clipBoardSpec'
 	classVariableNames:'UserClass UserSpecs UserLabels'
@@ -927,9 +929,17 @@
                     #'layout:' #(#LayoutFrame 102 0 90 0 191 0 108 0)
                     #'showPercentage:' true
                 )
+                 #(#'ProgressIndicatorSpec'
+                    #'name:' 'Progress Indicator 2'
+                    #'layout:' #(#LayoutFrame 102 0 116 0 191 0 126 0)
+                    #'showPercentage:' false
+                    #'foregroundColor:' #(#Color 100.0 0.0 0.0)
+                )
               )
           )
       )
+
+    "Modified: / 24.10.1997 / 03:27:42 / cg"
 !
 
 standardText