From 898580c35bc6acd75b6e1d4c8691f9d91391aaf8 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Per=20=C3=98yvind=20Karlsen?= Date: Fri, 7 Jan 2011 21:56:04 +0000 Subject: ndle URPM::Package->fullname returning vector of different lengths (#61702) --- Makefile | 2 +- NEWS | 4 ++++ Rpmdrake/formatting.pm | 4 +++- 3 files changed, 8 insertions(+), 2 deletions(-) diff --git a/Makefile b/Makefile index 5f9c9cef..92a7bad0 100644 --- a/Makefile +++ b/Makefile @@ -1,4 +1,4 @@ -VERSION = 5.26.5 +VERSION = 5.26.6 NAME = rpmdrake DIRS = grpmi po data mime diff --git a/NEWS b/NEWS index da644e94..046c4f16 100644 --- a/NEWS +++ b/NEWS @@ -1,3 +1,7 @@ +Version 5.26.6 - 7 Januar 2011, Per Øyvind Karlsen + +- handle URPM::Package->fullname returning vector of different lengths (#61702) + Version 5.26.5 - 24 October 2010, Thierry Vignaud - add a minimal "testsuite" in order to prevent syntax errors such as #60901 diff --git a/Rpmdrake/formatting.pm b/Rpmdrake/formatting.pm index 6e4e0dc7..b60b01e1 100644 --- a/Rpmdrake/formatting.pm +++ b/Rpmdrake/formatting.pm @@ -91,7 +91,9 @@ sub my_fullname { sub urpm_name { return '?-?-?.?' unless ref $_[0]; - my ($name, $version, $release, $arch) = $_[0]->fullname; + my @fullname = $_[0]->fullname; + my ($name, $version, $release) = @fullname; + my $arch = @fullname[-1]; "$name-$version-$release.$arch"; } -- cgit v1.2.1