diff options
Diffstat (limited to 'scripts/post_to_hook.pl')
| -rw-r--r-- | scripts/post_to_hook.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/scripts/post_to_hook.pl b/scripts/post_to_hook.pl index 2e2f717..55d3d73 100644 --- a/scripts/post_to_hook.pl +++ b/scripts/post_to_hook.pl @@ -13,7 +13,8 @@ use Dancer::Test; use Dancer::Config qw/setting/; use File::Spec::Functions; -my $content = LoadFile(catfile(qw/t data hook_data.yml/)); +my $content = LoadFile(shift || catfile(qw/t data hook_data.yml/)); + my $db_file = catfile( qw/t data jitterbug.db/ ); my $dsn = 'dbi:SQLite:dbname=' . $db_file; my $schema = jitterbug::Schema->connect($dsn); |