Description: Setting the database directory for SQLite3 databases.
Author: Andrius Merkys <merkys@debian.org>
--- a/website/cgi-bin/tables.pl
+++ b/website/cgi-bin/tables.pl
@@ -71,7 +71,7 @@
 $ENV{PATH} = ""; # Untaint and clean PATH
 
 # Path to database directory for SQlite3 databases:
-my $db_dir = $dir . "/db";
+my $db_dir = '/var/lib/restfuldb/db';
 
 my @warnings;
 local $SIG{__WARN__} = sub { print STDERR $_[0]; push @warnings, $_[0] };
--- a/website/cgi-bin/db.pl
+++ b/website/cgi-bin/db.pl
@@ -69,7 +69,7 @@
 $ENV{PATH} = ""; # Untaint and clean PATH
 
 # Path to database directory for SQlite3 databases:
-my $db_dir = $dir . "/db";
+my $db_dir = '/var/lib/restfuldb/db';
 
 Hash::Merge::set_behavior( 'RIGHT_PRECEDENT' );
 
--- a/website/cgi-bin/modify.pl
+++ b/website/cgi-bin/modify.pl
@@ -57,7 +57,7 @@
 $ENV{PATH} = ""; # Untaint and clean PATH
 
 # Path to database directory for SQlite3 databases:
-my $db_dir = $dir . "/db";
+my $db_dir = '/var/lib/restfuldb/db';
 
 Hash::Merge::set_behavior( 'RIGHT_PRECEDENT' );
 
--- a/website/cgi-bin/image.pl
+++ b/website/cgi-bin/image.pl
@@ -30,7 +30,7 @@
 $ENV{PATH} = ""; # Untaint and clean PATH
 
 # Path to database directory for SQlite3 databases:
-my $db_dir = $dir . "/db";
+my $db_dir = '/var/lib/restfuldb/db';
 
 my $cgi = new CGI;
 my $format = 'html';