OpenPKG CVS Repository
  http://cvs.openpkg.org/
  ____________________________________________________________________________

  Server: cvs.openpkg.org                  Name:   Ralf S. Engelschall
  Root:   /v/openpkg/cvs                   Email:  r...@openpkg.org
  Module: openpkg-src                      Date:   16-Feb-2009 19:43:23
  Branch: HEAD                             Handle: 2009021618432200

  Modified files:
    openpkg-src/perl-dbi    perl-dbi.patch perl-dbi.spec

  Log:
    modifying package: perl-dbi-5.10.0 20090210 -> 20090216

  Summary:
    Revision    Changes     Path
    1.50        +0  -80     openpkg-src/perl-dbi/perl-dbi.patch
    1.327       +2  -2      openpkg-src/perl-dbi/perl-dbi.spec
  ____________________________________________________________________________

  patch -p0 <<'@@ .'
  Index: openpkg-src/perl-dbi/perl-dbi.patch
  ============================================================================
  $ cvs diff -u -r1.49 -r1.50 perl-dbi.patch
  --- openpkg-src/perl-dbi/perl-dbi.patch       10 Feb 2009 08:00:43 -0000      
1.49
  +++ openpkg-src/perl-dbi/perl-dbi.patch       16 Feb 2009 18:43:22 -0000      
1.50
  @@ -127,83 +127,3 @@
    #include <mysql.h>  /* Comes with MySQL-devel */
    #include <mysqld_error.h>  /* Comes MySQL */
    
  -Index: SQL-Translator-0.09003/Build.PL
  ---- SQL-Translator-0.09003/Build.PL.orig     2009-02-07 19:21:37 +0100
  -+++ SQL-Translator-0.09003/Build.PL  2009-02-10 08:57:34 +0100
  -@@ -25,7 +25,6 @@
  -     'Class::MakeMethods'       => 0,
  -     'Digest::SHA1'             => 2.00,
  -     'IO::Dir'                  => 0,
  --    'Log::Log4perl'            => 0,
  -     'Parse::RecDescent'        => 1.94,
  -     'Pod::Usage'               => 0,
  -     'Class::Accessor::Fast'    => 0,
  -@@ -45,13 +44,6 @@
  -     'XML::XPath'              => 1.13,
  -   },
  -   build_requires => {
  --    'File::Basename'          => 0,
  --    'File::Spec'              => 0,
  --    'Test::More'              => 0.6,
  --    'Test::Differences'       => 0,
  --    'Test::Exception'         => 0,
  --    'Test::Differences'       => 0,
  --    'YAML'                    => 0.39,
  -   },
  - 
  -   add_to_cleanup => [ 'SQL-Translator-*' ],
  -Index: SQL-Translator-0.09003/lib/SQL/Translator/Schema/Graph.pm
  ---- SQL-Translator-0.09003/lib/SQL/Translator/Schema/Graph.pm.orig   
2009-02-07 19:21:37 +0100
  -+++ SQL-Translator-0.09003/lib/SQL/Translator/Schema/Graph.pm        
2009-02-10 08:56:57 +0100
  -@@ -5,8 +5,6 @@
  - use Data::Dumper;
  - local $Data::Dumper::Maxdepth = 3;
  - 
  --use Log::Log4perl qw(:easy);
  --Log::Log4perl->easy_init($ERROR) unless Log::Log4perl->initialized();
  - use SQL::Translator::Schema::Graph::Node;
  - use SQL::Translator::Schema::Graph::Edge;
  - use SQL::Translator::Schema::Graph::Port;
  -@@ -173,7 +171,6 @@
  -   }
  - 
  -   my $graph = $self; #hack
  --  my $log   = Log::Log4perl->get_logger('SQL.Translator.Schema.Graph');
  - 
  -   #
  -   # create methods
  -@@ -208,8 +205,6 @@
  -           $hyperedge->push_thatfield($edge->thisfield);
  -           $hyperedge->push_thatviafield($edge->thatfield);
  -         }
  --        $log->debug($edge->thisfield->name);
  --        $log->debug($edge->thatfield->name);
  -       }
  - 
  -       if ($hyperedge->count_thisnode == 1 and $hyperedge->count_thatnode == 
1) {
  -@@ -222,25 +217,11 @@
  -         $hyperedge->type('many2many');
  -       }
  - 
  --      $log->debug($_) foreach sort keys 
%::SQL::Translator::Schema::Graph::HyperEdge::;
  --
  -       #node_to won't always be defined b/c of multiple edges to a single 
other node
  -       if (defined($node_to)) {
  --        $log->debug($node_from->name);
  --        $log->debug($node_to->name);
  --
  -         if (scalar($hyperedge->thisnode) > 1) {
  --          $log->debug($hyperedge->type ." via ". $hyperedge->vianode->name);
  -           my $i = 0;
  -           foreach my $thisnode ( $hyperedge->thisnode ) {
  --            $log->debug($thisnode->name .' '.
  --                        $hyperedge->thisfield_index(0)->name .' -> '.
  --                        $hyperedge->thisviafield_index($i)->name .' '.
  --                        $hyperedge->vianode->name .' '.
  --                        $hyperedge->thatviafield_index(0)->name .' <- '.
  --                        $hyperedge->thatfield_index(0)->name .' '.
  --                        $hyperedge->thatnode_index(0)->name ."\n"
  --                       );
  -             $i++;
  -           }
  -         }
  @@ .
  patch -p0 <<'@@ .'
  Index: openpkg-src/perl-dbi/perl-dbi.spec
  ============================================================================
  $ cvs diff -u -r1.326 -r1.327 perl-dbi.spec
  --- openpkg-src/perl-dbi/perl-dbi.spec        10 Feb 2009 08:00:43 -0000      
1.326
  +++ openpkg-src/perl-dbi/perl-dbi.spec        16 Feb 2009 18:43:22 -0000      
1.327
  @@ -29,7 +29,7 @@
   %define       V_sql_routine     0.70.3
   %define       V_sql_builder     0.033
   %define       V_sql_interpolate 0.33
  -%define       V_sql_translator  0.09003
  +%define       V_sql_translator  0.09004
   %define       V_dbd_mock        1.39
   %define       V_dbd_anydata     0.09
   %define       V_dbd_csv         0.22
  @@ -54,7 +54,7 @@
   Group:        Perl
   License:      GPL/Artistic
   Version:      %{V_perl}
  -Release:      20090210
  +Release:      20090216
   
   #   package options
   %option       with_sqlite       yes
  @@ .
______________________________________________________________________
OpenPKG                                             http://openpkg.org
CVS Repository Commit List                     openpkg-cvs@openpkg.org

Reply via email to