[Enh]: GnuCash File w Unzipping - Move From Computer World

Better situated in a resource than as utility methods there
seandenigris · Nov 16, 2023 · 20ea040 · 20ea040
1 parent 753b70c
commit 20ea040
Showing 1 changed file with 23 additions and 0 deletions.
diff --git a/src/ResourcesLive/VsGnuCashFile.class.st 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
+]