cvs commit: p5ee/P5EEx/Blue/P5EEx/Blue Repository.pm

[spadkins]

cvsuser     02/04/17 12:19:16

  Modified:    P5EEx/Blue/P5EEx/Blue Repository.pm
  Log:
  added, then commented out some debug statements
  
  Revision  Changes    Path
  1.13      +5 -1      p5ee/P5EEx/Blue/P5EEx/Blue/Repository.pm
  
  Index: Repository.pm
  ===================================================================
  RCS file: /cvs/public/p5ee/P5EEx/Blue/P5EEx/Blue/Repository.pm,v
  retrieving revision 1.12
  retrieving revision 1.13
  diff -u -w -r1.12 -r1.13
  --- Repository.pm     9 Apr 2002 20:00:34 -0000       1.12
  +++ Repository.pm     17 Apr 2002 19:19:16 -0000      1.13
  @@ -1,6 +1,6 @@
   
   #############################################################################
  -## $Id: Repository.pm,v 1.12 2002/04/09 20:00:34 spadkins Exp $
  +## $Id: Repository.pm,v 1.13 2002/04/17 19:19:16 spadkins Exp $
   #############################################################################
   
   package P5EEx::Blue::Repository;
  @@ -1177,14 +1177,18 @@
       $nrows = 0;
       if ($update_first) {
           $nrows = $self->update_row($table,$cols,$row,$keycolidx);
  +        #print "store_row(): UPDATE: ", $self->error(), "\n", $self->{sql}, "\n";
           if (!$nrows) {
               $nrows = $self->insert_row($table,$cols,$row);
  +            #print "store_row(): INSERT: ", $self->error(), "\n", $self->{sql}, 
"\n";
           }
       }
       else {
           $nrows = $self->insert_row($table,$cols,$row);
  +        #print "store_row(): INSERT: ", $self->error(), "\n", $self->{sql}, "\n";
           if (!$nrows) {
               $nrows = $self->update_row($table,$cols,$row,$keycolidx);
  +            #print "store_row(): UPDATE: ", $self->error(), "\n", $self->{sql}, 
"\n";
           }
       }
       $self->{numrows} = $nrows;