Playlist support, other randomness.

[dvddb] / upgrade-v3

diff --git a/upgrade-v3 b/upgrade-v3
index e3cc8bb..f2098c3 100755 (executable)
--- a/upgrade-v3
+++ b/upgrade-v3
@@ -10,17 +10,14 @@ BEGIN { binmode STDOUT, ":utf8"; }
 my $DB = DBI->connect("dbi:Pg:host=roadstar", "", "",
                      { AutoCommit => 0, RaiseError => 1 });
 
-my $st_outer =
-  $DB->prepare("SELECT title, COUNT(*) FROM old_dvd GROUP BY title");
-my $st_inner =
-  $DB->prepare("SELECT disc, path, discid FROM old_dvd WHERE title = ?");
-my $st_add_set =
-  $DB->prepare("INSERT INTO dvd_set (name, ndisc)
-               VALUES (?, ?)
-               RETURNING id");
-my $st_add_disc =
-  $DB->prepare("INSERT INTO dvd_disc (set_id, disc, path, disc_id)
-               VALUES (?, ?, ?, ?)");
+my $st_outer = $DB->prepare
+  ("SELECT title, COUNT(*) FROM old_dvd GROUP BY title");
+my $st_inner = $DB->prepare
+  ("SELECT disc, path, discid FROM old_dvd WHERE title = ?");
+my $st_add_set = $DB->prepare
+  ("INSERT INTO dvd_set (name, ndisc) VALUES (?, ?) RETURNING id");
+my $st_add_disc = $DB->prepare
+  ("INSERT INTO dvd_disc (set_id, disc, path, disc_id) VALUES (?, ?, ?, ?)");
 $st_outer->execute;
 
 OUTER: for (;;) {