X-Git-Url: https://git.octo.it/?a=blobdiff_plain;f=lib%2FOnis%2FData%2FPersistent%2FDbm.pm;h=6f9c5d745be51ece98b6083763f06291fda7f0bf;hb=c597ff40a3b00537c7b2656ea67acebbc7863503;hp=2e1cac6748cc3662f388c00ea7f737306f56accd;hpb=34031a5be99f9952dc602bb4a28c7a826bef5e6d;p=onis.git

diff --git a/lib/Onis/Data/Persistent/Dbm.pm b/lib/Onis/Data/Persistent/Dbm.pm
index 2e1cac6..6f9c5d7 100644
--- a/lib/Onis/Data/Persistent/Dbm.pm
+++ b/lib/Onis/Data/Persistent/Dbm.pm
@@ -35,12 +35,21 @@ onis' main directory..
 
 =cut
 
-our $DBMDirectory = get_config ('storage_dir') || 'var';
-$DBMDirectory =~ s#/$##g;
+our $DBMDirectory = 'var';
+if (get_config ('storage_dir'))
+{
+	$DBMDirectory = get_config ('storage_dir');
+}
+elsif ($ENV{'HOME'})
+{
+	$DBMDirectory = $ENV{'HOME'} . '/.onis/data';
+}
+$DBMDirectory =~ s#/+$##g;
 
 if (!$DBMDirectory or !-d $DBMDirectory)
 {
 	print STDERR <<ERROR;
+
 The directory ``$DBMDirectory'' does not exist or is not useable. Please
 create it before running onis.
 ERROR