[popfile-commit] engine/POPFile Database.pm,1.8,1.9

[Manni H. <man...@us...>]

Update of /cvsroot/popfile/engine/POPFile
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv25303/POPFile

Modified Files:
	Database.pm 
Log Message:
Added a new-line.

Index: Database.pm
===================================================================
RCS file: /cvsroot/popfile/engine/POPFile/Database.pm,v
retrieving revision 1.8
retrieving revision 1.9
diff -C2 -d -r1.8 -r1.9
*** Database.pm	30 Mar 2008 05:33:58 -0000	1.8
--- Database.pm	5 Apr 2008 10:32:53 -0000	1.9
***************
*** 84,88 ****
  
      $self->config_( 'dbconnect', 'dbi:SQLite2:dbname=$dbname' );
!     $self->config_( 'dbuser', '' ); $self->config_( 'dbauth', '' );
  
      # SQLite 1.05+ have some problems we are resolving.  This lets us
--- 84,89 ----
  
      $self->config_( 'dbconnect', 'dbi:SQLite2:dbname=$dbname' );
!     $self->config_( 'dbuser', '' );
!     $self->config_( 'dbauth', '' );
  
      # SQLite 1.05+ have some problems we are resolving.  This lets us
***************
*** 174,178 ****
      # backup the database by copying it
  
!     if ( ( $self->config_( 'sqlite_tweaks' ) & 2 ) && 
           $self->{db_is_sqlite__} ) {
          if ( !copy( $self->{db_name__}, $self->{db_name__} . ".backup" ) ) {
--- 175,179 ----
      # backup the database by copying it
  
!     if ( ( $self->config_( 'sqlite_tweaks' ) & 2 ) &&
           $self->{db_is_sqlite__} ) {
          if ( !copy( $self->{db_name__}, $self->{db_name__} . ".backup" ) ) {
***************
*** 197,201 ****
      my ( $self, $tweak, $state, $db ) = @_;
  
!     if ( $self->{db_is_sqlite__} && 
           ( $self->config_( 'sqlite_tweaks' ) & $tweak ) ) {
  
--- 198,202 ----
      my ( $self, $tweak, $state, $db ) = @_;
  
!     if ( $self->{db_is_sqlite__} &&
           ( $self->config_( 'sqlite_tweaks' ) & $tweak ) ) {
  
***************
*** 344,348 ****
          # to strip off any sqlquotechars from the table names we retrieve
  
!         my $sqlquotechar = $db->get_info(29) || ''; 
          my @tables = map { s/$sqlquotechar//g; $_ } ($db->tables());
  
--- 345,349 ----
          # to strip off any sqlquotechars from the table names we retrieve
  
!         my $sqlquotechar = $db->get_info(29) || '';
          my @tables = map { s/$sqlquotechar//g; $_ } ($db->tables());