From b3d8adec7eab3acf50925fb988da58fc43d4dc4b Mon Sep 17 00:00:00 2001 From: Offray Luna Date: Tue, 17 Jan 2023 17:22:55 -0500 Subject: [PATCH] Loading configuration files. --- app/VideoWeb/Invidious.class.st | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) diff --git a/app/VideoWeb/Invidious.class.st b/app/VideoWeb/Invidious.class.st index 6a5f331..5688035 100644 --- a/app/VideoWeb/Invidious.class.st +++ b/app/VideoWeb/Invidious.class.st @@ -16,6 +16,17 @@ Class { #category : #VideoWeb } +{ #category : #accessing } +Invidious class >> configFile [ + | configFolder | + configFolder := (FileLocator userData / 'Mutabit' / 'VideoWeb') ensureCreateDirectory. + ^ configFolder / 'config.ston' +] + +{ #category : #accessing } +Invidious class >> configFolder [ +] + { #category : #accessing } Invidious class >> default: anObject [ default := anObject @@ -40,6 +51,11 @@ Invidious class >> instancesWithAPIEnabled [ ^ self instances select: [ :instance | instance api = true ] ] +{ #category : #accessing } +Invidious class >> loadConfiguration [ + ^ self default: (STON fromString: self configFile contents) +] + { #category : #accessing } Invidious class >> rawInstances [ ^ STON