Exportación a markdown de nodos de código

This commit is contained in:
Offray Vladimir Luna Cárdenas 2015-02-12 20:41:39 +00:00
parent 11cefd26b6
commit 621c640199

View File

@ -314,7 +314,7 @@ GrafoscopioNode >> markdownContent [
| markdown configDict specialWords embedNodes temporalBody invisibleChildren | | markdown configDict specialWords embedNodes temporalBody invisibleChildren |
markdown := '' writeStream. markdown := '' writeStream.
specialWords := #('%config' '%abstract' '%invisible' '%idea' '%footnote' 'nuevoNodo' '%embed'). specialWords := #('%config' '%abstract' '%invisible' '%idea' '%footnote' 'nuevoNodo' '%embed').
(specialWords includes: self header) not & (specialWords includes: ((self header findTokens: $ ) at: 1)) not (specialWords includes: self header) not & (specialWords includes: ((self header findTokens: $ ) at: 1)) not & (self tags = 'código') not
ifTrue: [ ifTrue: [
self level timesRepeat: [ markdown nextPutAll: '#' ]. self level timesRepeat: [ markdown nextPutAll: '#' ].
markdown nextPutAll: ' '. markdown nextPutAll: ' '.