From a2dfdd89faaddc1e86fe937c76532b0bd31af2f7 Mon Sep 17 00:00:00 2001
From: Mark Wooding <mdw@distorted.org.uk>
Date: Sat, 11 Feb 2023 23:04:13 +0000
Subject: [PATCH] pldb: Force the database name.

This could really do with a proper configuration mechanism.
---
 pldb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/pldb b/pldb
index 2e70b6c..73fb31d 100755
--- a/pldb
+++ b/pldb
@@ -44,7 +44,7 @@ sub db_connect (;$) {
 	      RaiseError => 1,
 	      ReadOnly => 1,
 	      %$opts);
-  $DB = DBI->connect("dbi:Pg:host=roadstar", "", "", \%opts);
+  $DB = DBI->connect("dbi:Pg:host=roadstar;dbname=mdw", "", "", \%opts);
 }
 
 sub must_exist ($$@) {
-- 
2.11.0