diff options
| author | Thierry Vignaud <tv@mageia.org> | 2012-02-16 06:12:30 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mageia.org> | 2012-02-16 06:12:30 +0000 |
| commit | 11df98ff2cb530b94838807f029d29862549f582 (patch) | |
| tree | 8acb008bc4dfd4bd4d62d06fab58214da6a4fc10 | |
| parent | 99b89b021caba5009bc3dadc5869b2c52555802b (diff) | |
| download | rpmdrake-11df98ff2cb530b94838807f029d29862549f582.tar rpmdrake-11df98ff2cb530b94838807f029d29862549f582.tar.gz rpmdrake-11df98ff2cb530b94838807f029d29862549f582.tar.bz2 rpmdrake-11df98ff2cb530b94838807f029d29862549f582.tar.xz rpmdrake-11df98ff2cb530b94838807f029d29862549f582.zip | |
(urpm_name) simplify
| -rw-r--r-- | Rpmdrake/formatting.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/Rpmdrake/formatting.pm b/Rpmdrake/formatting.pm index 6a617778..95da9728 100644 --- a/Rpmdrake/formatting.pm +++ b/Rpmdrake/formatting.pm @@ -92,8 +92,7 @@ sub my_fullname { sub urpm_name { return '?-?-?.?' unless ref $_[0]; - my ($name, $version, $release, $arch) = $_[0]->fullname; - "$name-$version-$release.$arch"; + scalar $_[0]->fullname; } |