Debugging default seed installation.

This commit is contained in:
Diego Ruidajo 2022-01-21 17:21:52 -05:00
parent fd11bfce87
commit 2a966e6e0d

View File

@ -23,11 +23,10 @@ TWSeed class >> initialize [
{ #category : #accessing } { #category : #accessing }
TWSeed class >> installDefaultInto: folder as: shortName [ TWSeed class >> installDefaultInto: folder as: shortName [
| url file | | url subfolder |
url := self list first demo. url := self list first demo.
file := (folder / shortName / 'index.html') asFileReference. subfolder := (folder / shortName) ensureCreateDirectory.
url asUrl saveContentsToFile: file. ^ url asUrl saveContentsToFile: subfolder / 'index.html'.
^ file asFileReference
] ]
{ #category : #accessing } { #category : #accessing }