rpm-5.4.13-perl-bindings-do-not-use-xmalloc.patch

   1 --- rpm-5.4.13/perl/RPM_Spec.xs.xmalloc~        2013-09-13 06:20:58.102257264 +0200
   2 +++ rpm-5.4.13/perl/RPM_Spec.xs 2013-09-13 06:21:28.680226625 +0200
   3 @@ -234,7 +234,7 @@ icon(spec)
   4          char * dest = NULL;
   5          int len;
   6          len = strlen(spec->sources->source);
   7 -        dest = xmalloc(len+1);
   8 +        dest = malloc(len+1);
   9         dest[len] = '\0';
  10          memcpy(dest, spec->sources->source, len);
  11          XPUSHs(sv_2mortal(newSVpv(dest, len)));
  12 @@ -249,7 +249,7 @@ icon_url(spec)
  13          char * dest = NULL;
  14          int len;
  15          len = strlen(spec->sources->fullSource);
  16 -        dest = xmalloc(len+1);
  17 +        dest = malloc(len+1);
  18          memcpy(dest, spec->sources->fullSource, len);
  19         dest[len] = '\0';
  20          XPUSHs(sv_2mortal(newSVpv(dest, len)));