switch SQLite to named params

mberends · Apr 23, 2012 · d9ec614 · d9ec614
1 parent 2d80367
commit d9ec614
Showing 1 changed file with 1 addition and 7 deletions.
diff --git a/lib/MiniDBD/SQLite.pm6 b/lib/MiniDBD/SQLite.pm6
@@ -197,13 +197,7 @@ class MiniDBD::SQLite:auth<mberends>:ver<0.0.1> {
     has $.Version = 0.01;
     has $.errstr;
     method !errstr() is rw { $!errstr }
-    method connect($, $, Str $params, $RaiseError) {
-        my @params = $params.split(';');
-        my %params;
-        for @params -> $p {
-            my ( $key, $value ) = $p.split('=');
-            %params{$key} = $value;
-        }
+    method connect(:$RaiseError, *%params) {
         my $dbname = %params<dbname> // %params<database>;
         die 'No "dbname" or "database" given' unless defined $dbname;