--- a/Tools__ChangeSetBrowser2.st Thu Sep 08 05:27:41 2011 +0200
+++ b/Tools__ChangeSetBrowser2.st Thu Sep 08 05:28:12 2011 +0200
@@ -2036,15 +2036,15 @@
changeMenuApplyChange: aChange
- aChange isClassDefinitionChange ifTrue:
- [(Smalltalk at: aChange superClassName asSymbol)
- ifNil:[^self error: 'Nil superclass']].
+"/ aChange isClassDefinitionChange ifTrue:
+"/ [(Smalltalk at: aChange superClassName asSymbol)
+"/ ifNil:[^self error: 'Nil superclass']].
self withWaitCursorDo:[
- MCStXNamespaceQuery
+ (MCStXNamespaceQuery , Class nameSpaceQuerySignal)
answer:(NameSpace name:(targetNamespace ? 'Smalltalk'))
do: [
- MCStXPackageQuery
+ (MCStXPackageQuery , Class packageQuerySignal)
answer: self targetPackage
do: [
MCInteractiveLoadingQuery answer: true do:[
@@ -2061,7 +2061,7 @@
].
"Modified: / 29-10-2010 / 14:57:58 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 07-09-2011 / 20:15:56 / cg"
+ "Modified: / 07-09-2011 / 22:24:57 / cg"
!
changeMenuApplyChanges: changesToApply
@@ -2220,11 +2220,11 @@
!ChangeSetBrowser2 class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeSetBrowser2.st,v 1.18 2011-09-07 18:26:38 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeSetBrowser2.st,v 1.19 2011-09-08 03:28:12 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeSetBrowser2.st,v 1.18 2011-09-07 18:26:38 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeSetBrowser2.st,v 1.19 2011-09-08 03:28:12 cg Exp $'
!
version_SVN