mirror of
https://codeberg.org/scip/note.git
synced 2025-12-17 04:31:02 +01:00
added lots of unittests and while I was at it, fixed a couple of bugs in the
backend modules.
This commit is contained in:
@@ -6,7 +6,7 @@
|
||||
|
||||
package NOTEDB::dbm;
|
||||
|
||||
$NOTEDB::dbm::VERSION = "1.40";
|
||||
$NOTEDB::dbm::VERSION = "1.41";
|
||||
|
||||
use DB_File;
|
||||
use NOTEDB;
|
||||
@@ -29,7 +29,7 @@ sub new
|
||||
|
||||
my $notefile = "note.dbm";
|
||||
my $timefile = "date.dbm";
|
||||
my $dbm_dir = $param{directory} || File::Spec->catfile($ENV{HOME}, ".note_dbm");
|
||||
my $dbm_dir = $self->{dbname} = $param{dbname} || File::Spec->catfile($ENV{HOME}, ".note_dbm");
|
||||
|
||||
if (! -d $dbm_dir) {
|
||||
# try to make it
|
||||
|
||||
Reference in New Issue
Block a user