A bug in lib/Onis/Parser/Persistent.pm has been fixed.

[onis.git] / lib / Onis / Data / Persistent / Dbm.pm

diff --git a/lib/Onis/Data/Persistent/Dbm.pm b/lib/Onis/Data/Persistent/Dbm.pm
index 2e1cac6..6f9c5d7 100644 (file)
--- 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