Show
Ignore:
Timestamp:
08/18/09 20:49:19 (4 years ago)
Author:
jesus
Message:

more code, at some point, I should see if this stuff even works

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/perl/lib/Cornea/RecallTable.pm

    r3 r4  
    99 
    1010  my $config = Cornea::Config->new(); 
    11   my $dbh = DBI->connect($config->dsn(), 
    12                          $config->dbuser(), 
    13                          $config->dbpass(), 
     11  my $dbh = DBI->connect($config->get("DB::dsn"), 
     12                         $config->get("DB::user"), 
     13                         $config->get("DB::pass"), 
    1414                         { PrintError => 0, RaiseError => 1 }, 
    1515                        );