initial checkin
authorClaus Gittinger <cg@exept.de>
Wed, 09 Feb 2011 11:44:15 +0100
changeset 13291 c81272783905
parent 13290 94b81d4551af
child 13292 e5c7b25479b4
initial checkin
AbortAllOperationWantedQuery.st
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/AbortAllOperationWantedQuery.st	Wed Feb 09 11:44:15 2011 +0100
@@ -0,0 +1,71 @@
+"
+ COPYRIGHT (c) 2011 by eXept Software AG
+              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
+ inclusion of the above copyright notice.   This software may not
+ be provided or otherwise made available to, or used by, any
+ other person.  No title to or ownership of the software is
+ hereby transferred.
+"
+"{ Package: 'stx:libbasic' }"
+
+Query subclass:#AbortAllOperationWantedQuery
+	instanceVariableNames:''
+	classVariableNames:''
+	poolDictionaries:''
+	category:'Kernel-Exceptions-Control'
+!
+
+!AbortAllOperationWantedQuery class methodsFor:'documentation'!
+
+copyright
+"
+ COPYRIGHT (c) 2011 by eXept Software AG
+              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
+ inclusion of the above copyright notice.   This software may not
+ be provided or otherwise made available to, or used by, any
+ other person.  No title to or ownership of the software is
+ hereby transferred.
+"
+!
+
+documentation
+"
+    A query to ask, if AbortAllOperationRequest should be offered via an extra
+    button from a dialog.
+
+    This is used by dialog boxes, to decide if an extra 'Abort All' button should be
+    shown, in situations where an operation might be issued both for a single item
+    or for a group of items, and it is not known at the place where the dialog is shown,
+    if it is part of a group-operation.
+"
+! !
+
+!AbortAllOperationWantedQuery methodsFor:'defaults'!
+
+defaultResumeValue
+    ^ false
+
+    "
+     AbortAllOperationOfferedQuery query
+
+     AbortAllOperationOfferedQuery 
+        answer:true
+        do:[
+            AbortAllOperationOfferedQuery query
+        ].
+    "
+
+    "Created: / 09-02-2011 / 11:42:28 / cg"
+! !
+
+!AbortAllOperationWantedQuery class methodsFor:'documentation'!
+
+version_CVS
+    ^ '$Header: /cvs/stx/stx/libbasic/AbortAllOperationWantedQuery.st,v 1.1 2011-02-09 10:44:15 cg Exp $'
+! !