Debuging new importation errors derived, probably, from coder updating strategies.
This commit is contained in:
parent
1b66316d03
commit
3c01731fdc
@ -28,7 +28,7 @@ LePharoSnippet >> fromMarkdeep: markdeepDiv [
|
|||||||
{ #category : #'*MiniDocs' }
|
{ #category : #'*MiniDocs' }
|
||||||
LePharoSnippet >> fromString: aString [
|
LePharoSnippet >> fromString: aString [
|
||||||
|
|
||||||
self code: aString
|
self coder forSource: aString
|
||||||
]
|
]
|
||||||
|
|
||||||
{ #category : #'*MiniDocs' }
|
{ #category : #'*MiniDocs' }
|
||||||
|
@ -10,7 +10,8 @@ OrderedDictionary >> asLepiterSnippet [
|
|||||||
| response |
|
| response |
|
||||||
self at: 'className' ifAbsent: [ ^ nil ].
|
self at: 'className' ifAbsent: [ ^ nil ].
|
||||||
response := (self at: 'className') asClass new.
|
response := (self at: 'className') asClass new.
|
||||||
response fromDictionary: self.
|
response fromDictionary: self.
|
||||||
|
response fromString: (self at: 'content').
|
||||||
self at: 'origin' ifPresent: [ response metadata at: 'origin' put: (self at: 'origin') ].
|
self at: 'origin' ifPresent: [ response metadata at: 'origin' put: (self at: 'origin') ].
|
||||||
self at: 'errata' ifPresent: [ response metadata at: 'errata' put: (self at: 'errata') ].
|
self at: 'errata' ifPresent: [ response metadata at: 'errata' put: (self at: 'errata') ].
|
||||||
^ response
|
^ response
|
||||||
|
Loading…
Reference in New Issue
Block a user