--- a/SVN__ProgressDialog.st	Mon Aug 08 15:31:33 2011 +0200
+++ b/SVN__ProgressDialog.st	Mon Aug 08 15:31:58 2011 +0200
@@ -1,14 +1,96 @@
+"
+ Copyright (c) 2007-2010 Jan Vrany
+ Copyright (c) 2009-2010 eXept Software AG
+
+ Permission is hereby granted, free of charge, to any person
+ obtaining a copy of this software and associated documentation
+ files (the 'Software'), to deal in the Software without
+ restriction, including without limitation the rights to use,
+ copy, modify, merge, publish, distribute, sublicense, and/or sell
+ copies of the Software, and to permit persons to whom the
+ Software is furnished to do so, subject to the following
+ conditions:
+
+ The above copyright notice and this permission notice shall be
+ included in all copies or substantial portions of the Software.
+
+ THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND,
+ EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
+ OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+ NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
+ HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
+ WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+ FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
+ OTHER DEALINGS IN THE SOFTWARE.
+"
 "{ Package: 'stx:libsvn' }"
 
 "{ NameSpace: SVN }"
 
 Dialog subclass:#ProgressDialog
 	instanceVariableNames:''
-	classVariableNames:''
+	classVariableNames:'CurrentQuerySignal'
 	poolDictionaries:''
 	category:'SVN-UI-Dialogs'
 !
 
+!ProgressDialog class methodsFor:'documentation'!
+
+copyright
+"
+ Copyright (c) 2007-2010 Jan Vrany
+ Copyright (c) 2009-2010 eXept Software AG
+
+ Permission is hereby granted, free of charge, to any person
+ obtaining a copy of this software and associated documentation
+ files (the 'Software'), to deal in the Software without
+ restriction, including without limitation the rights to use,
+ copy, modify, merge, publish, distribute, sublicense, and/or sell
+ copies of the Software, and to permit persons to whom the
+ Software is furnished to do so, subject to the following
+ conditions:
+
+ The above copyright notice and this permission notice shall be
+ included in all copies or substantial portions of the Software.
+
+ THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND,
+ EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
+ OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+ NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
+ HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
+ WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+ FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
+ OTHER DEALINGS IN THE SOFTWARE.
+
+"
+!
+
+example1
+
+    SVN::ProgressDialog
+! !
+
+!ProgressDialog class methodsFor:'initialization'!
+
+initialize
+    "Invoked at system start or when the class is dynamically loaded."
+
+    CurrentQuerySignal := QuerySignal new
+
+    "Modified: / 10-03-2010 / 18:38:07 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!ProgressDialog class methodsFor:'accessing'!
+
+current
+
+    | current |
+    current := CurrentQuerySignal query.
+    current ifNil:[current := self new].
+    ^current
+
+    "Created: / 10-03-2010 / 18:37:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
 
 !ProgressDialog class methodsFor:'interface opening'!
 
@@ -96,14 +178,10 @@
     "Created: / 28-10-2008 / 14:53:45 / Jan Vrany <vranyj1@fel.cvut.cz>"
 ! !
 
-!ProgressDialog methodsFor:'accessing'!
+!ProgressDialog class methodsFor:'others'!
 
-answerValueSelector
-    "Superclass SVN::Dialog says that I am responsible to implement this method"
-
-    ^#yourself
-
-    "Created: / 28-10-2008 / 14:59:01 / Jan Vrany <vranyj1@fel.cvut.cz>"
+version_CVS
+    ^ '$ÂHeader: /cvs/stx/stx/libsvn/SVN__ProgressDialog.st,v 1.4 2009/10/19 12:22:05 fm Exp Â$'
 ! !
 
 !ProgressDialog methodsFor:'accessing - defaults'!
@@ -158,13 +236,11 @@
 !ProgressDialog class methodsFor:'documentation'!
 
 version
-    ^ '$Header$'
-!
-
-version_CVS
-    ^ '$Header$'
+    ^ '$Id$'
 !
 
 version_SVN
-    ^'§Id: SVN__ProgressDialog.st 110 2009-08-19 13:21:10Z vranyj1 §'
+    ^ '§Id: SVN__ProgressDialog.st 350 2011-07-07 18:42:56Z vranyj1 §'
 ! !
+
+ProgressDialog initialize!