-
Notifications
You must be signed in to change notification settings - Fork 0
/
Config.boo
74 lines (62 loc) · 1.95 KB
/
Config.boo
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
/* This file is a part of Flickroff
*
* Copyright (C) 2008:
*
* Authors:
* Michael Dominic K. <mdk@mdk.am>
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License
* as published by the Free Software Foundation; either version 2
* of the License, or (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
*/
namespace Flickroff
import System
import System.IO
import GConf
static class Config:
_client as Client
_basePath = "/apps/flickroff/"
_defaultPhotosDir
PhotosDirectory as string:
set:
SetString ("photos_directory", value)
get:
return GetString ("photos_directory", _defaultPhotosDir)
PreviousPhotosDirectory as string:
set:
SetString ("previous_photos_directory", value)
get:
return GetString ("previous_photos_directory", _defaultPhotosDir)
Token as string:
set:
SetString ("token", value)
get:
return GetString ("token", "")
def Initialize ():
_client = Client ()
userdir = Environment.GetEnvironmentVariable ('HOME')
_defaultPhotosDir = Path.Combine (userdir, "Flickr photos")
private def GetString (path, default) as string:
ret as string
try:
ret = _client.Get (_basePath + path) as string
ret = default if ret == null
except:
ret = default
return ret
private def SetString (path, value):
value = String.Empty if value == null
try:
_client.Set (_basePath + path, value)
except:
pass