Permalink
Browse files

more PgPir removal

  • Loading branch information...
1 parent 20cfae1 commit 2b3ec5d0b5d8571f7cf247286f922daf927173cb @moritz moritz committed Apr 27, 2012
Showing with 0 additions and 96 deletions.
  1. +0 −43 t/30-PgPir-common.t.not.ready
  2. +0 −53 t/30-PgPir-specific.t.not.ready
@@ -1,43 +0,0 @@
-# MiniDBI/t/30-PgPir-common.t
-use v6;
-use Test;
-use MiniDBI;
-
-# Define the only database specific values used by the common tests.
-my ( $mdriver, $test_dsn, $test_user, $test_password );
-{
- # Define values that are relevant only to MySQL
- my $hostname = 'localhost';
- my $database = 'zavolaj';
- # Set up the common variables with the MySQL specific values
- $mdriver = 'PgPir';
- $test_dsn = "MiniDBI:$mdriver" ~ ":database=$database;"
- ~ "host=$hostname";
- $test_user = 'testuser';
- $test_password = 'testpass';
-}
-
-# Detect and report possible errors from eval of the common test script
-warn $! if "ok 99-common.pl6" ne eval slurp 't/99-common.pl6';
-
-=begin pod
-
-=head1 PREREQUISITES
-Your system should already have libpq-dev installed. Change to the
-postgres user and connect to the postgres server as follows:
-
- sudo -u postgres psql
-
-Then set up a test environment with the following:
-
- CREATE DATABASE zavolaj;
- CREATE ROLE testuser LOGIN PASSWORD 'testpass';
- GRANT ALL PRIVILEGES ON DATABASE zavolaj TO testuser;
-
-The '\l' psql command output should include zavolaj as a database name.
-Exit the psql client with a ^D, then try to use the new account:
-
- psql --host=localhost --dbname=zavolaj --username=testuser --password
- SELECT * FROM pg_database;
-
-=end pod
@@ -1,53 +0,0 @@
-use v6;
-use Test;
-plan *;
-
-use MiniDBI;
-
-my $mdriver = 'PgPir';
-my $host = 'localhost';
-my $port = 5432;
-my $database = 'testdb';
-my $user = 'testuser';
-my $password = 'testpass';
-# my $password = 'Cho5thae';
-
-my $test_dsn = "MiniDBI:{$mdriver}:dbname=$database;host=$host;port=$port";
-
-my $drh = MiniDBI.install_driver($mdriver);
-ok $drh, 'Install driver';
-
-my $dbh;
-lives_ok { $dbh = MiniDBI.connect($test_dsn, $user, $password,
- RaiseError => 1, PrintError => 1, AutoCommit => 1) },
- 'Connecting lives';
-
-ok defined($dbh), 'DBH is defined';
-ok $dbh, 'DBH is true';
-# lives_ok { $dbh.finish }, 'Can finish DBH';
-#nok $dbh, 'finished DBH is false';
-
-
-done_testing;
-
-=begin pod
-
-=head1 PREREQUISITES
-Your system should already have libpq-dev installed. Change to the
-postgres user and connect to the postgres server as follows:
-
- sudo -u postgres psql
-
-Then set up a test environment with the following:
-
- CREATE DATABASE testdb;
- CREATE ROLE testuser LOGIN PASSWORD 'testpass';
- GRANT ALL PRIVILEGES ON DATABASE testdb TO testuser;
-
-The '\l' psql command output should include testdb as a database name.
-Exit the psql client with a ^D, then try to use the new account:
-
- psql --host=localhost --dbname=testdb --username=testuser --password
- SELECT * FROM pg_database;
-
-=end pod

0 comments on commit 2b3ec5d

Please sign in to comment.