(EVR) fix it on packages from rpmdb (was ok on synthesis ones) (mga#7739)

1 files changed, 5 insertions, 2 deletions

diff --git a/URPM.xs b/URPM.xs
index 4391c68..3818162 100644
--- a/URPM.xs
+++ b/URPM.xs
@@ -1453,8 +1453,11 @@ Pkg_EVR(pkg)
          mXPUSHs(newSVpv(res, 0));
          *arch = '.'; /* restore info string modified */
       }
-    } else if (pkg->h)
-         mXPUSHs(newSVpv(get_name(pkg->h, RPMTAG_EVR), 0));
+    } else if (pkg->h) {
+         char *s = headerGetAsString(pkg->h, RPMTAG_EVR);
+         mXPUSHs(newSVpv(s, 0));
+         free(s);
+    }
 
 void
 Pkg_arch(pkg)