--- a/Tools__ChangeSetBrowser2.st Mon Jan 28 21:19:21 2013 +0000
+++ b/Tools__ChangeSetBrowser2.st Fri Feb 08 08:35:48 2013 +0100
@@ -80,6 +80,7 @@
"
! !
+
!ChangeSetBrowser2 class methodsFor:'instance creation'!
on: aStringOrChangeSet
@@ -127,6 +128,7 @@
"Created: / 17-05-2012 / 23:36:13 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
+
!ChangeSetBrowser2 class methodsFor:'accessing'!
showRemoved
@@ -139,6 +141,7 @@
ShowRemoved := aBoolean
! !
+
!ChangeSetBrowser2 class methodsFor:'help specs'!
flyByHelpSpec
@@ -362,6 +365,7 @@
"Modified: / 01-08-2012 / 18:40:10 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
+
!ChangeSetBrowser2 class methodsFor:'image specs'!
applyFromLastSnapshotIcon
@@ -632,6 +636,7 @@
@P@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@') ; colorMapFromArray:#[0 0 0 255 255 255 255 0 0 170 170 170]; mask:((Depth1Image new) width: 22; height: 22; photometric:(#blackIs0); bitsPerSample:(#(1)); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'C??@C??@C??@C??@C??@C??@C??@C??@C??@C??@C??@C??@C??@C??B@@@B@C@B@G B@O0@@_8@@G @@G @@G @') ; yourself); yourself]
! !
+
!ChangeSetBrowser2 class methodsFor:'interface opening'!
confirmChanges: aChangeSet
@@ -709,15 +714,16 @@
!
openOn: aChangeSet
- ^(self on: aChangeSet)
- open;
- yourself.
+ ^(self on: aChangeSet)
+ open;
+ yourself
"
- self openOn: ChangeSet current
+ self openOn: ChangeSet current
"
- "Modified: / 30-01-2012 / 15:59:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified (comment): / 24-01-2012 / 20:01:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 26-07-2012 / 13:19:18 / cg"
!
openOn: aChangeSet label: aString
@@ -735,6 +741,7 @@
"Modified: / 26-07-2012 / 13:19:30 / cg"
! !
+
!ChangeSetBrowser2 class methodsFor:'interface specs'!
hierarchicalNavigatorSpec
@@ -1220,6 +1227,7 @@
"Modified: / 16-03-2012 / 13:09:44 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
+
!ChangeSetBrowser2 class methodsFor:'menu specs'!
changeMenu
@@ -1730,6 +1738,7 @@
)
! !
+
!ChangeSetBrowser2 class methodsFor:'plugIn spec'!
aspectSelectors
@@ -1749,6 +1758,7 @@
! !
+
!ChangeSetBrowser2 methodsFor:'accessing'!
allowAccept: aBoolean
@@ -1851,6 +1861,7 @@
"Created: / 26-10-2010 / 23:01:51 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
+
!ChangeSetBrowser2 methodsFor:'accessing - defaults'!
defaultTitle
@@ -1859,6 +1870,7 @@
"Modified: / 08-04-2011 / 10:10:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
+
!ChangeSetBrowser2 methodsFor:'accessing - menus'!
list1MenuHolder
@@ -1887,6 +1899,7 @@
"Modified (format): / 05-09-2011 / 16:07:34 / cg"
! !
+
!ChangeSetBrowser2 methodsFor:'actions'!
accept: source
@@ -1908,6 +1921,7 @@
"Modified: / 19-07-2011 / 19:08:13 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
+
!ChangeSetBrowser2 methodsFor:'aspects'!
allowAcceptHolder
@@ -2337,7 +2351,10 @@
"Created: / 07-09-2011 / 15:54:03 / cg"
"Created: / 11-02-2012 / 22:40:27 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-! !
+!
+
+ !
+
!ChangeSetBrowser2 methodsFor:'aspects-queries'!
@@ -2377,6 +2394,7 @@
"Created: / 17-05-2012 / 20:45:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
+
!ChangeSetBrowser2 methodsFor:'change & update'!
changesetChanged
@@ -2450,6 +2468,7 @@
"Created: / 24-10-2009 / 19:29:17 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
+
!ChangeSetBrowser2 methodsFor:'initialization'!
list1View: aSubApplicationView
@@ -2468,6 +2487,7 @@
"Modified: / 10-09-2012 / 14:22:50 / cg"
! !
+
!ChangeSetBrowser2 methodsFor:'menu actions'!
doApply
@@ -2590,13 +2610,7 @@
"Modified: / 27-07-2012 / 21:21:24 / cg"
!
-doOpenCurrent
-
- self doOpenFile: ObjectMemory nameForChanges.
- self showFilter: true.
-
- "Created: / 05-12-2009 / 13:44:05 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-!
+
doOpenCurrentChangeFile
self withWaitCursorDo:[
@@ -2832,6 +2846,7 @@
"Created: / 07-09-2011 / 12:47:15 / cg"
! !
+
!ChangeSetBrowser2 methodsFor:'menu actions - changes'!
changeMenuApply: changeList
@@ -3246,6 +3261,7 @@
"Created: / 23-07-2012 / 13:13:11 / cg"
! !
+
!ChangeSetBrowser2 methodsFor:'menu actions - changes - helpers'!
changeMenuApplyChange: aChange
@@ -3333,6 +3349,7 @@
"Modified: / 21-01-2013 / 17:12:58 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
+
!ChangeSetBrowser2 methodsFor:'private'!
changesDo:aBlock
@@ -3387,9 +3404,9 @@
"/ selectionHolder value isEmptyOrNil ifTrue:[
"/ (self navigatorChangesetHolder value ? #()) do: aBlock
"/ ] ifFalse:[
- selection2Holder value isEmptyOrNil not
- ifTrue:[selection2Holder value do: [:e|e notNil ifTrue:[applyBlock value:e]]]
- ifFalse:[selection1Holder value do: [:e|e notNil ifTrue:[applyBlock value:e]]].
+ selection2Holder value isEmptyOrNil not
+ ifTrue:[selection2Holder value do: [:e|e notNil ifTrue:[applyBlock value:e]]]
+ ifFalse:[selection1Holder value do: [:e|e notNil ifTrue:[applyBlock value:e]]].
"/ ].
self redrawChangeListViews
@@ -3441,6 +3458,7 @@
"Created: / 07-09-2011 / 20:12:04 / cg"
! !
+
!ChangeSetBrowser2 methodsFor:'queries'!
canApplyChanges
@@ -3479,6 +3497,7 @@
"Created: / 04-08-2011 / 18:25:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
+
!ChangeSetBrowser2 methodsFor:'testing'!
isHierarchical
@@ -3505,6 +3524,7 @@
"Created: / 30-03-2012 / 11:59:58 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
+
!ChangeSetBrowser2::ChangeEditor class methodsFor:'documentation'!
documentation
@@ -3541,6 +3561,7 @@
"
! !
+
!ChangeSetBrowser2::ChangeEditor class methodsFor:'interface specs'!
windowSpec
@@ -3624,6 +3645,7 @@
"Modified: / 16-03-2012 / 13:08:12 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
+
!ChangeSetBrowser2::ChangeEditor methodsFor:'accessing'!
sourceChangeHolder
@@ -3642,6 +3664,7 @@
sourceImageHolder := something.
! !
+
!ChangeSetBrowser2::ChangeEditor methodsFor:'aspects'!
changeHolder
@@ -3752,6 +3775,7 @@
showdiffHolder := something.
! !
+
!ChangeSetBrowser2::ChangeEditor methodsFor:'change & update'!
changeChanged
@@ -3781,14 +3805,15 @@
"Modified: / 29-11-2011 / 11:15:00 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
+
!ChangeSetBrowser2 class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeSetBrowser2.st,v 1.43 2012/12/14 09:09:51 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeSetBrowser2.st,v 1.43 2012-12-14 09:09:51 stefan Exp $'
!
version_CVS
- ^ '§Header: /cvs/stx/stx/libtool/Tools__ChangeSetBrowser2.st,v 1.43 2012/12/14 09:09:51 stefan Exp §'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__ChangeSetBrowser2.st,v 1.43 2012-12-14 09:09:51 stefan Exp $'
!
version_HG
@@ -3797,6 +3822,6 @@
!
version_SVN
- ^ '§Id: Tools__ChangeSetBrowser2.st 8083 2013-01-14 11:48:37Z vranyj1 §'
+ ^ '§Id: Tools__ChangeSetBrowser.st 7486 2009-10-26 22:06:24Z vranyj1 §'
! !