RPM Package Manager, CVS Repository
  http://rpm5.org/cvs/
  ____________________________________________________________________________

  Server: rpm5.org                         Name:   Anders F. Björklund
  Root:   /v/rpm/cvs                       Email:  afb@rpm5.org
  Module: rpm                              Date:   12-Sep-2007 09:05:04
  Branch: HEAD                             Handle: 2007091208050400

  Modified files:
    rpm/perl                RPM_Files.xs RPM_Header.xs RPM_Spec.xs
                            RPM_Transaction.xs

  Log:
    silence some compiler warnings

  Summary:
    Revision    Changes     Path
    1.6         +1  -1      rpm/perl/RPM_Files.xs
    1.7         +3  -0      rpm/perl/RPM_Header.xs
    1.3         +1  -1      rpm/perl/RPM_Spec.xs
    1.7         +3  -1      rpm/perl/RPM_Transaction.xs
  ____________________________________________________________________________

  patch -p0 <<'@@ .'
  Index: rpm/perl/RPM_Files.xs
  ============================================================================
  $ cvs diff -u -r1.5 -r1.6 RPM_Files.xs
  --- rpm/perl/RPM_Files.xs	21 Aug 2007 13:56:19 -0000	1.5
  +++ rpm/perl/RPM_Files.xs	12 Sep 2007 07:05:04 -0000	1.6
  @@ -157,7 +157,7 @@
       if ((digest = rpmfiDigest(Files, &algop, &lenp)) != NULL
           /* return undef if empty */) {
           if (lenp) {
  -        XPUSHs(sv_2mortal(newSVpv(digest, lenp)));
  +        XPUSHs(sv_2mortal(newSVpv((const char*)digest, lenp)));
           XPUSHs(sv_2mortal(newSViv(algop)));
           }
       }
  @@ .
  patch -p0 <<'@@ .'
  Index: rpm/perl/RPM_Header.xs
  ============================================================================
  $ cvs diff -u -r1.6 -r1.7 RPM_Header.xs
  --- rpm/perl/RPM_Header.xs	9 Sep 2007 09:01:53 -0000	1.6
  +++ rpm/perl/RPM_Header.xs	12 Sep 2007 07:05:04 -0000	1.7
  @@ -16,6 +16,9 @@
   #include "rpmts.h"
   #include "rpmte.h"
   
  +#include "rpmds.h"
  +#include "rpmfi.h"
  +
   #include "header.h"
   #include "rpmdb.h"
   #include "misc.h"
  @@ .
  patch -p0 <<'@@ .'
  Index: rpm/perl/RPM_Spec.xs
  ============================================================================
  $ cvs diff -u -r1.2 -r1.3 RPM_Spec.xs
  --- rpm/perl/RPM_Spec.xs	15 Aug 2007 21:03:54 -0000	1.2
  +++ rpm/perl/RPM_Spec.xs	12 Sep 2007 07:05:04 -0000	1.3
  @@ -116,7 +116,7 @@
       Package pkg;
       const char * binFormat;
       char * binRpm;
  -    char * path;
  +    const char * path;
       PPCODE:
       for(pkg = spec->packages; pkg != NULL; pkg = pkg->next) {
           if (pkg->fileList == NULL)
  @@ .
  patch -p0 <<'@@ .'
  Index: rpm/perl/RPM_Transaction.xs
  ============================================================================
  $ cvs diff -u -r1.6 -r1.7 RPM_Transaction.xs
  --- rpm/perl/RPM_Transaction.xs	14 Aug 2007 16:36:47 -0000	1.6
  +++ rpm/perl/RPM_Transaction.xs	12 Sep 2007 07:05:04 -0000	1.7
  @@ -126,7 +126,7 @@
   	return rc;	
   }
   
  -rpmCallbackFunction
  +void *
       transCallback(const void *h,
          const rpmCallbackType what,
          const unsigned long long amount,
  @@ -228,6 +228,8 @@
   
   MODULE = RPM::Transaction		PACKAGE = RPM::Transaction
   
  +PROTOTYPES: ENABLE
  +
   rpmts
   new(class, ...)
       char * class
  @@ .