nestorsire/PaqueteSemanal
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Extrayendo metadatos para todos los subfolders.

Browse Source
This commit is contained in:
nestorsire 2022-11-21 13:09:16 -05:00
parent 5984ff492c
commit e171bbd37a
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/PaqueteSemanal/PaqueteSemanal.class.st
View File

@ -16,6 +16,16 @@ PaqueteSemanal class >> location: anObject [
location := anObject location := anObject
] ]
{ #category : #accessing }
PaqueteSemanal >> extractMetadataForAllFolders [
| subfolders |
subfolders := self location children reject: [:each | each basename = '.DS_Store'].
subfolders do: [:each |
self extractMetadataForFolder: each basename.
].
^ self metadataFolder
]
{ #category : #accessing } { #category : #accessing }
PaqueteSemanal >> extractMetadataForFolder: subfolder [ PaqueteSemanal >> extractMetadataForFolder: subfolder [