PubPub reformating in a single message.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2023-05-16 10:20:40 -05:00
parent baba99ec84
commit eeb2330fe8
2 changed files with 18 additions and 2 deletions

View File

@ -170,6 +170,17 @@ Markdeep >> fromMarkdownFile: aFileReference [
^ self. ^ self.
] ]
{ #category : #accessing }
Markdeep >> fromPubPubToMarkdeep [
self
removeAutoGeneratedFileNotice;
removeCCByLicenseDiv;
commentPubPubDelimiters;
replaceEscapedCharacters;
renamePubPubFootnotes;
removeAlternativeImagesArray
]
{ #category : #accessing } { #category : #accessing }
Markdeep >> gtTextFor: aView [ Markdeep >> gtTextFor: aView [
<gtView> <gtView>
@ -402,6 +413,8 @@ Markdeep >> pubPubRawLinks [
{ #category : #accessing } { #category : #accessing }
Markdeep >> reformatPubPubFootnotes [ Markdeep >> reformatPubPubFootnotes [
| footnotesLines footnotesIDs toReplace response | | footnotesLines footnotesIDs toReplace response |
(self = self pubPubFootnotesLinesRangeForContents)
ifTrue: [^self].
footnotesLines := self contents lines footnotesLines := self contents lines
copyFrom: self pubPubFootnotesLinesRangeForContents first copyFrom: self pubPubFootnotesLinesRangeForContents first
to: self pubPubFootnotesLinesRangeForContents second. to: self pubPubFootnotesLinesRangeForContents second.

View File

@ -53,11 +53,14 @@ PubPub >> defaultTitle [
PubPub >> downloadContents [ PubPub >> downloadContents [
| workingDirectory | | workingDirectory |
workingDirectory := self folder / self currentLanguage / 'book'. workingDirectory := self folder / self currentLanguage / 'book'.
self tableOfContents keysAndValuesDo: [ :name :chapterAddress | self tableOfContents keysAndValuesDo: [ :name :chapterAddress | |currentFileName|
currentFileName := name, '--', chapterAddress, '.md'.
(workingDirectory / currentFileName) asFileReference ensureDelete.
(workingDirectory / 'markdown') asFileReference ensureDelete.
ZnClient new ZnClient new
get: self address, 'pub/', chapterAddress, '/download/markdown'; get: self address, 'pub/', chapterAddress, '/download/markdown';
downloadTo: workingDirectory . downloadTo: workingDirectory .
workingDirectory / 'markdown' renameTo: name, '--', chapterAddress, '.md' workingDirectory / 'markdown' renameTo: currentFileName
]. ].
^ workingDirectory ^ workingDirectory
] ]