Re: [Oscar-checkins] CVS: oscar/scripts read_package_config_xml_into_database,1.4,1.5

[Neil G. <ngo...@nc...>]

I thought someone else here had already submitted a bug about this. If 
sourceforge ever comes back up, I'll submit the bug. This is a required fix 
for opder functionality.

At 04:31 PM 7/23/2003 -0400, Jeff Squyres wrote:
>Neil --
>
>We are in a source code freeze.
>
>You must back this out.  If it's a bug, file it, set it as a priority of 8
>and request permission to commit it.
>
>
>On Wed, 23 Jul 2003, Neil Gorsuch wrote:
>
> > Update of /cvsroot/oscar/oscar/scripts
> > In directory sc8-pr-cvs1:/tmp/cvs-serv20270
> >
> > Modified Files:
> >       read_package_config_xml_into_database
> > Log Message:
> > Fixed it so that the old packages_rpmlists records are deleted for a 
> package
> > before the rpmlists data from the package config.xml is inserted into the
> > database.
> >
> >
> > Index: read_package_config_xml_into_database
> > ===================================================================
> > RCS file: 
> /cvsroot/oscar/oscar/scripts/read_package_config_xml_into_database,v
> > retrieving revision 1.4
> > retrieving revision 1.5
> > diff -u -r1.4 -r1.5
> > --- read_package_config_xml_into_database     18 Jul 2003 21:13:23 
> -0000      1.4
> > +++ read_package_config_xml_into_database     23 Jul 2003 20:28:32 
> -0000      1.5
> > @@ -1884,6 +1884,22 @@
> >               }
> >           }
> >       }
> > +     my @error_strings = ();
> > +     my @tables = ( "packages_rpmlists" );
> > +     my @package_rpmlist_records_wheres =
> > +         ( "packages_rpmlists.package_id = \"$package_id\"" );
> > +     push @package_rpmlist_records_wheres,
> > +         "packages_rpmlists.package_version = \"$package_version\""
> > +         if $multiple_package_versions;
> > +     if ( ! oda::delete_records( \%options,
> > +                                 \@tables,
> > +                                 \@package_rpmlist_records_wheres,
> > +                                 \@error_strings ) ) {
> > +         oda::disconnect( \%options,
> > +                          \@error_strings );
> > +         warn shift @error_strings while @error_strings;
> > +         exit 1;
> > +     }
> >      }
> >  }
> >  if ( $options{debug} ) {
> >
> >
> >
> > -------------------------------------------------------
> > This SF.Net email sponsored by: Free pre-built ASP.NET sites including
> > Data Reports, E-commerce, Portals, and Forums are available now.
> > Download today and enter to win an XBOX or Visual Studio .NET.
> > http://aspnet.click-url.com/go/psa00100003ave/direct;at.aspnet_072303_01/01
> > _______________________________________________
> > Oscar-checkins mailing list
> > Osc...@li...
> > https://lists.sourceforge.net/lists/listinfo/oscar-checkins
> >
>
>--
>{+} Jeff Squyres
>{+} jsq...@la...
>{+} http://www.lam-mpi.org/