-
Notifications
You must be signed in to change notification settings - Fork 0
Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
Closes #5
- Loading branch information
Showing
100 changed files
with
413 additions
and
146 deletions.
There are no files selected for viewing
This file was deleted.
Oops, something went wrong.
3 changes: 0 additions & 3 deletions
3
src/GitS-Core.package/GSBrowser.class/instance/actionRefreshRefList.st
This file was deleted.
Oops, something went wrong.
3 changes: 3 additions & 0 deletions
3
src/GitS-Core.package/GSBrowser.class/instance/actionRefreshRefTree.st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,3 @@ | ||
actions | ||
actionRefreshRefTree | ||
self updateRefTree. |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -1,7 +1,8 @@ | ||
accessing | ||
activeRef: aString | ||
self basicActiveRef: aString. | ||
activeRef := aString. | ||
self activeRefCommit ifNotNil: [:commit | self activeCommit: commit]. | ||
self | ||
activeRefTreeMember: (aString ifNotNil: [self refTree ensure: aString]); | ||
changed: #activeRef; | ||
changed: #commitList. |
7 changes: 7 additions & 0 deletions
7
src/GitS-Core.package/GSBrowser.class/instance/activeRefTreeMember..st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,7 @@ | ||
accessing | ||
activeRefTreeMember: aRefTreeMember | ||
activeRefTreeMember = aRefTreeMember ifTrue: [^ self]. | ||
activeRefTreeMember := aRefTreeMember. | ||
self changed: #activeRefTreeMember. | ||
(aRefTreeMember notNil and: [aRefTreeMember isRef]) | ||
ifTrue: [self activeRef: aRefTreeMember ref]. |
3 changes: 3 additions & 0 deletions
3
src/GitS-Core.package/GSBrowser.class/instance/activeRefTreeMember.st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,3 @@ | ||
accessing | ||
activeRefTreeMember | ||
^ activeRefTreeMember |
3 changes: 0 additions & 3 deletions
3
src/GitS-Core.package/GSBrowser.class/instance/basicActiveRef..st
This file was deleted.
Oops, something went wrong.
10 changes: 0 additions & 10 deletions
10
src/GitS-Core.package/GSBrowser.class/instance/buildRefList..st
This file was deleted.
Oops, something went wrong.
10 changes: 10 additions & 0 deletions
10
src/GitS-Core.package/GSBrowser.class/instance/buildRefTree..st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,10 @@ | ||
toolbuilder | ||
buildRefTree: builder | ||
^ builder pluggableTreeSpec new | ||
model: self; | ||
roots: #refTreeRoots; | ||
getSelected: #activeRefTreeMember; | ||
setSelected: #activeRefTreeMember:; | ||
nodeClass: GSRefTreeMemberWrapper; | ||
menu: #refListMenu:; | ||
yourself |
4 changes: 2 additions & 2 deletions
4
...ss/instance/buildRefreshRefListButton..st → ...ss/instance/buildRefreshRefTreeButton..st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -1,7 +1,7 @@ | ||
toolbuilder | ||
buildRefreshRefListButton: builder | ||
buildRefreshRefTreeButton: builder | ||
^ builder pluggableActionButtonSpec new | ||
model: self; | ||
action: #actionRefreshRefList; | ||
action: #actionRefreshRefTree; | ||
label: 'Refresh'; | ||
yourself |
2 changes: 1 addition & 1 deletion
2
src/GitS-Core.package/GSBrowser.class/instance/buildRefsButtons..st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -1,6 +1,6 @@ | ||
toolbuilder | ||
buildRefsButtons: builder | ||
^ GSGUIUtilities buildButtons: { | ||
self buildRefreshRefListButton: builder. | ||
self buildRefreshRefTreeButton: builder. | ||
self buildFetchAllButton: builder. | ||
} with: builder |
2 changes: 1 addition & 1 deletion
2
src/GitS-Core.package/GSBrowser.class/instance/buildRefsPanel..st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -1,6 +1,6 @@ | ||
toolbuilder | ||
buildRefsPanel: builder | ||
^ GSGUIUtilities buildVerticalLayout: { | ||
self buildRefList: builder. | ||
self buildRefTree: builder. | ||
self buildRefsButtons: builder. | ||
} with: builder |
12 changes: 0 additions & 12 deletions
12
src/GitS-Core.package/GSBrowser.class/instance/doesRef.comeBeforeRef..st
This file was deleted.
Oops, something went wrong.
10 changes: 0 additions & 10 deletions
10
src/GitS-Core.package/GSBrowser.class/instance/ensureActiveRefIdentityIn..st
This file was deleted.
Oops, something went wrong.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
10 changes: 10 additions & 0 deletions
10
src/GitS-Core.package/GSBrowser.class/instance/initializeRefTree.st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,10 @@ | ||
ui | ||
initializeRefTree | ||
self | ||
refTree: (GSRefTree new | ||
workingCopy: self activeWorkingCopy; | ||
label: 'root'; | ||
ref: ''; | ||
yourself); | ||
updateRefTree. | ||
^ self refTree |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file was deleted.
Oops, something went wrong.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,3 @@ | ||
accessing | ||
refTree: aRefTree | ||
refTree := aRefTree |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,3 @@ | ||
accessing | ||
refTree | ||
^ refTree ifNil: [self initializeRefTree] |
3 changes: 3 additions & 0 deletions
3
src/GitS-Core.package/GSBrowser.class/instance/refTreeRoots.st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,3 @@ | ||
ui | ||
refTreeRoots | ||
^ self refTree children |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
|
@@ -2,4 +2,4 @@ updating | |
refsChanged | ||
self | ||
changed: #commitList; | ||
changed: #refList. | ||
updateRefTree. |
4 changes: 0 additions & 4 deletions
4
src/GitS-Core.package/GSBrowser.class/instance/showGitRefs..st
This file was deleted.
Oops, something went wrong.
3 changes: 0 additions & 3 deletions
3
src/GitS-Core.package/GSBrowser.class/instance/showGitRefs.st
This file was deleted.
Oops, something went wrong.
3 changes: 0 additions & 3 deletions
3
src/GitS-Core.package/GSBrowser.class/instance/toggleShowGitRefs.st
This file was deleted.
Oops, something went wrong.
6 changes: 6 additions & 0 deletions
6
src/GitS-Core.package/GSBrowser.class/instance/updateRefTree.st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,6 @@ | ||
ui | ||
updateRefTree | ||
self activeWorkingCopy | ||
ifNil: [self refTree children removeAll] | ||
ifNotNil: [:workingCopy | workingCopy updateRefTree: self refTree]. | ||
self changed: #refTreeRoots. |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
13 changes: 13 additions & 0 deletions
13
src/GitS-Core.package/GSGitWorkingCopy.class/instance/addOtherRefsRootTo.references..st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,13 @@ | ||
ref-tree | ||
addOtherRefsRootTo: aRefTree references: aCollection | ||
| other | | ||
other := aRefTree ensureDirectory: '' label: 'other refs'. | ||
((aCollection | ||
select: [:each | each beginsWith: 'refs/squeak/']) | ||
collect: [:each | (((each splitBy: '/') first: 3) joinSeparatedBy: '/'), $/]) | ||
asSet do: [:imageRef | | image | | ||
image := other | ||
ensureDirectory: imageRef | ||
label: (imageRef = self refsBaseName ifTrue: ['this image'] ifFalse: ['a different image']). | ||
imageRef = self refsBaseName | ||
ifFalse: [image ensureDirectory: imageRef, 'heads/' label: 'local branches']]. |
11 changes: 11 additions & 0 deletions
11
src/GitS-Core.package/GSGitWorkingCopy.class/instance/addRefTreeRootsTo.references..st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,11 @@ | ||
ref-tree | ||
addRefTreeRootsTo: aRefTree references: aCollection | ||
aRefTree ensureDirectory: self branchesBaseName label: 'local branches'. | ||
self remoteNames do: [:each | | ||
aRefTree | ||
ensureDirectory: self remoteRefBaseName, each, $/ | ||
label: ('remote branches on {1}' format: {each printString})]. | ||
aRefTree | ||
ensureDirectory: self gitBranchesBaseName label: 'external branches'; | ||
ensureDirectory: 'refs/tags/' label: 'tags'. | ||
self addOtherRefsRootTo: aRefTree references: aCollection. |
3 changes: 0 additions & 3 deletions
3
src/GitS-Core.package/GSGitWorkingCopy.class/instance/isHeadDetached.st
This file was deleted.
Oops, something went wrong.
12 changes: 12 additions & 0 deletions
12
src/GitS-Core.package/GSGitWorkingCopy.class/instance/updateRefTree..st
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,12 @@ | ||
ref-tree | ||
updateRefTree: aRefTree | ||
| keep references | | ||
references := self allReferences. | ||
self addRefTreeRootsTo: aRefTree references: references. | ||
keep := Set new. | ||
references do: [:each | | member | | ||
member := aRefTree ensure: each. | ||
keep addAll: member withAllParents]. | ||
aRefTree | ||
keepOnly: keep; | ||
compressChildrenUnsorted. |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Empty file.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,3 @@ | ||
adding | ||
addRef: aString | ||
^ self children add: (self createRef: aString) |
Oops, something went wrong.