From 20ea040ed8a9487ac4a0463ac4ffc6a5a284a110 Mon Sep 17 00:00:00 2001 From: Sean DeNigris Date: Wed, 15 Nov 2023 23:22:37 -0500 Subject: [PATCH] [Enh]: GnuCash File w Unzipping - Move From Computer World Better situated in a resource than as utility methods there --- src/ResourcesLive/VsGnuCashFile.class.st | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) create mode 100644 src/ResourcesLive/VsGnuCashFile.class.st diff --git a/src/ResourcesLive/VsGnuCashFile.class.st b/src/ResourcesLive/VsGnuCashFile.class.st new file mode 100644 index 0000000..26d64a2 --- /dev/null +++ b/src/ResourcesLive/VsGnuCashFile.class.st @@ -0,0 +1,23 @@ +Class { + #name : #VsGnuCashFile, + #superclass : #RlResource, + #category : #ResourcesLive +} + +{ #category : #accessing } +VsGnuCashFile class >> fileExtensions [ + ^ #('gnucash') +] + +{ #category : #accessing } +VsGnuCashFile >> uncompress [ + + | target | + target := Tempfile withSuffix: '.xml'. + SuGenericUnixCommand new + template: '/usr/bin/gunzip -c {source} > {target}'; + argumentAt: #source put: self file; + argumentAt: #target put: target; + run. + ^ target +]