From 42b0b0546ecc2d2de7370e369aca39bb67241fdb Mon Sep 17 00:00:00 2001
From: Rafael Garcia-Suarez <rgarciasuarez@mandriva.org>
Date: Wed, 25 Jan 2006 14:18:48 +0000
Subject: Flag headers returned by spec2srcheader() as source packages

---
 URPM.xs | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/URPM.xs b/URPM.xs
index 0391ec2..2c40f2f 100644
--- a/URPM.xs
+++ b/URPM.xs
@@ -3659,12 +3659,14 @@ Urpm_spec2srcheader(specfile)
 /* Do not verify whether sources exist */
 #define SPEC_FORCE 1
   if (!parseSpec(ts, specfile, "/", NULL, 0, NULL, NULL, SPEC_ANYARCH, SPEC_FORCE)) {
+    int_32 one = 1;
     SV *sv_pkg;
     spec = rpmtsSetSpec(ts, NULL);
     if (! spec->sourceHeader)
       initSourceHeader(spec);
     pkg = (URPM__Package)malloc(sizeof(struct s_Package));
     memset(pkg, 0, sizeof(struct s_Package));
+    headerAddEntry(spec->sourceHeader, RPMTAG_SOURCEPACKAGE, RPM_INT32_TYPE, &one, 1);
     pkg->h = headerLink(spec->sourceHeader);
     sv_pkg = sv_newmortal();
     sv_setref_pv(sv_pkg, "URPM::Package", (void*)pkg);
-- 
cgit v1.2.1