aboutsummaryrefslogtreecommitdiffstats
path: root/Rpmdrake
diff options
context:
space:
mode:
Diffstat (limited to 'Rpmdrake')
-rw-r--r--Rpmdrake/gui.pm2
-rw-r--r--Rpmdrake/pkg.pm2
2 files changed, 2 insertions, 2 deletions
diff --git a/Rpmdrake/gui.pm b/Rpmdrake/gui.pm
index f103fffa..95d90df1 100644
--- a/Rpmdrake/gui.pm
+++ b/Rpmdrake/gui.pm
@@ -207,7 +207,7 @@ sub get_details {
my ($pkg, $upkg, $installed_version, $raw_medium) = @_;
my $a = ugtk2::markup_to_TextView_format(
$spacing . join("\n$spacing",
- format_field(N("Version: ")) . evr($upkg),
+ format_field(N("Version: ")) . $upkg->EVR,
($upkg->flag_installed ?
format_field(N("Currently installed version: ")) . $installed_version : ()
),
diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm
index 12ab3452..3b171c4d 100644
--- a/Rpmdrake/pkg.pm
+++ b/Rpmdrake/pkg.pm
@@ -192,7 +192,7 @@ sub extract_header {
sub find_installed_version {
my ($p) = @_;
my $version;
- open_rpm_db()->traverse_tag_find('name', $p->name, sub { $version = evr($_[0]) });
+ open_rpm_db()->traverse_tag_find('name', $p->name, sub { $version = $_[0]->EVR });
$version || N("(none)");
}