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

Depurando extracción de metadatos.

Browse Source
This commit is contained in:
nestorsire 2022-11-21 12:42:11 -05:00
parent 1bba25f2fc
commit d1568f748d
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -20,7 +20,7 @@ PaqueteSemanal class >> location: anObject [
PaqueteSemanal >> extractMetadataForFolder: subfolder [ PaqueteSemanal >> extractMetadataForFolder: subfolder [
| subfolderFiles extractMetadatos | | subfolderFiles extractMetadatos |
subfolderFiles := subfolder allChildren select: [:item | item isFile and: [(item basename = '.DS_Store') not ]]. subfolderFiles := (self location / subfolder) allChildren select: [:item | item isFile and: [(item basename = '.DS_Store') not ]].
subfolderFiles do: [:archivoPruebas | | metadatosArchivo titulo metaTiddler | subfolderFiles do: [:archivoPruebas | | metadatosArchivo titulo metaTiddler |
extractMetadatos := GtSubprocessWithInMemoryOutput new extractMetadatos := GtSubprocessWithInMemoryOutput new
command: '/usr/local/bin/exiftool'; command: '/usr/local/bin/exiftool';
@ -42,6 +42,11 @@ PaqueteSemanal >> extractMetadataForFolder: subfolder [
] ]
{ #category : #accessing }
PaqueteSemanal >> location [
^ location
]
{ #category : #accessing } { #category : #accessing }
PaqueteSemanal >> location: anObject [ PaqueteSemanal >> location: anObject [
location := anObject location := anObject