Grafoscopio
/
Grafoscopio
2
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Implementing images downloading

This commit is contained in:
EduardoRiesco 2017-12-02 18:39:05 +00:00 committed by SantiagoBragagnolo
parent c74577b988
commit 375c3f201b
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/Grafoscopio/GrafoscopioNode.class.st
View File

@ -333,8 +333,12 @@ GrafoscopioNode >> demote [
GrafoscopioNode >> downloadImagesInto: folder [
"comment stating purpose of message"
self extractHtmlImages do: [ :each | |localFolder|
localFolder := (folder / each directory) ensureCreateDirectory.
self extractHtmlImages do: [ :each | |localFolder path|
path:=''.
(each directory substrings: '/') do: [ :eachDirectory |
path:= path , '/' , eachDirectory .
(folder / path) ensureCreateDirectory ].
localFolder := (folder / each directory).
ZnClient new
url: each ;
downloadTo: localFolder . ]