Passing to taskit shell some usage of pandoc
This commit is contained in:
parent
d1320c4717
commit
0bf527c0f3
@ -159,7 +159,7 @@ GrafoscopioDocumentation >> registerIntoDockingBar [
|
||||
metadata ifNotNil: [
|
||||
metadata
|
||||
at: 'showOnHelp'
|
||||
ifPresent: [ GrafoscopioDockingBar addToHelpMenu: currentNotebook ] ] ]
|
||||
ifPresent: [ self error:' missing class grafoscopio docking bar' "GrafoscopioDockingBar addToHelpMenu: currentNotebook" ] ] ]
|
||||
]
|
||||
|
||||
{ #category : #accessing }
|
||||
|
@ -84,14 +84,14 @@ Pandoc class >> htmlToMarkdown: inputFile [
|
||||
{ #category : #'as yet unclassified' }
|
||||
Pandoc class >> listImagesFrom: aFileReference [
|
||||
"I provide a list of all images contained in aFile."
|
||||
|
||||
| filter commandString outputString |
|
||||
filter := FileLocator temp asFileReference / 'image-links.lua'.
|
||||
filter exists ifFalse: [ self downloadLuaFilters ].
|
||||
commandString := 'pandoc ', aFileReference fullName, ' --lua-filter=',filter fullName.
|
||||
Smalltalk platformName = 'unix'
|
||||
ifTrue: [ ^ self extractImagesInUnixFor: aFileReference withFilter: filter ].
|
||||
Smalltalk platformName = 'Win32'
|
||||
ifTrue: [ self ].
|
||||
filter exists
|
||||
ifFalse: [ self downloadLuaFilters ].
|
||||
commandString := 'pandoc ' , aFileReference fullName
|
||||
, ' --lua-filter=' , filter fullName.
|
||||
^ self extractImagesInUnixFor: aFileReference withFilter: filter
|
||||
]
|
||||
|
||||
{ #category : #utility }
|
||||
|
Loading…
Reference in New Issue
Block a user