Migrating to a new development image.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2017-11-28 21:24:55 +00:00
parent 62465a5a47
commit 966c0e8456

View File

@ -114,7 +114,8 @@ FossilRepo >> jsonDataFor: anUrlSegment [
{ #category : #querying } { #category : #querying }
FossilRepo >> jsonStringFor: aFileName [ FossilRepo >> jsonStringFor: aFileName [
| baseUrl queryForJSONData | | baseUrl queryForJSONData |
baseUrl := self remote addPathSegments: #('json' 'finfo'). baseUrl := self remote.
baseUrl addPathSegments: #('json' 'finfo').
queryForJSONData := baseUrl queryAt: 'name' put: aFileName. queryForJSONData := baseUrl queryAt: 'name' put: aFileName.
^ (ZnEasy get: queryForJSONData) contents. ^ (ZnEasy get: queryForJSONData) contents.
] ]