Better names for operations
This commit is contained in:
parent
a016c66c0a
commit
73c63fb81e
@ -12,11 +12,6 @@ Class {
|
||||
#category : #'Grafoscopio-Model'
|
||||
}
|
||||
|
||||
{ #category : #'as yet unclassified' }
|
||||
FossilRepo >> hashNumberFor: aFileName [
|
||||
^ (((self jsonDataFor: aFileName) at: 'payload') at: 'checkins') first at: 'uuid'
|
||||
]
|
||||
|
||||
{ #category : #'as yet unclassified' }
|
||||
FossilRepo >> jsonDataFor: aFileName [
|
||||
^ NeoJSONReader fromString: (self jsonStringFor: aFileName)
|
||||
@ -30,6 +25,11 @@ FossilRepo >> jsonStringFor: aFileName [
|
||||
^ (ZnEasy get: queryForJSONData) contents.
|
||||
]
|
||||
|
||||
{ #category : #'as yet unclassified' }
|
||||
FossilRepo >> lastHashNumberFor: aFileName [
|
||||
^ (((self jsonDataFor: aFileName) at: 'payload') at: 'checkins') first at: 'uuid'
|
||||
]
|
||||
|
||||
{ #category : #accessing }
|
||||
FossilRepo >> url [
|
||||
^ url
|
||||
|
Loading…
Reference in New Issue
Block a user