Changeset 84 in bookmarks for trunk

Timestamp:

06/03/15 21:31:18 (10 years ago)

Author:

peter

Message:

issue #9: use FindBin to get the actual path to the bookmarks.sql

File:

• trunk/lib/Bookmarks.pm (modified) (1 diff)

trunk/lib/Bookmarks.pm

@@ -40 +40 @@
     my $self = shift;
     require File::Slurp;
-    my $table_definitions = File::Slurp::read_file('bookmarks.sql');
+    require FindBin;
+    my $table_definitions = File::Slurp::read_file("$FindBin::RealBin/bookmarks.sql");
     $self->dbh->{sqlite_allow_multiple_statements} = 1;
     $self->dbh->do($table_definitions);