fix release string returned for packages having disttag containing terminating '0's

1 files changed, 1 insertions, 1 deletions

diff --git a/URPM.xs b/URPM.xs
index a83b1e3..f41b3ae 100644
--- a/URPM.xs
+++ b/URPM.xs
@@ -1724,7 +1724,7 @@ Pkg_release(pkg)
 
     get_fullname_parts(pkg, NULL, NULL, &release, &arch, NULL);
     if (arch - release < 1) croak("invalid fullname");
-    XPUSHs(sv_2mortal(newSVpv(release, arch-release-1)));
+    XPUSHs(sv_2mortal(newSVpv(release, arch[-2] ? arch-release-1 : 0)));
     restore_chars();
   } else if (pkg->h) {
     XPUSHs(sv_2mortal(newSVpv(get_name(pkg->h, RPMTAG_RELEASE), 0)));