From f9bfed3fba01029c3267ef18f72eba87dee5dc54 Mon Sep 17 00:00:00 2001 From: Angelo Naselli Date: Sat, 6 Sep 2014 22:30:27 +0200 Subject: fixed File::ShareDir::dist_file distName from Shared --- lib/AdminPanel/Rpmdragora/edit_urpm_sources.pm | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'lib/AdminPanel/Rpmdragora/edit_urpm_sources.pm') diff --git a/lib/AdminPanel/Rpmdragora/edit_urpm_sources.pm b/lib/AdminPanel/Rpmdragora/edit_urpm_sources.pm index aa900b5..154f304 100644 --- a/lib/AdminPanel/Rpmdragora/edit_urpm_sources.pm +++ b/lib/AdminPanel/Rpmdragora/edit_urpm_sources.pm @@ -30,6 +30,7 @@ use File::HomeDir qw(home); use lib qw(/usr/lib/libDrakX); use common; +use AdminPanel::Shared; use AdminPanel::Shared::Locales; use AdminPanel::rpmdragora; use AdminPanel::Rpmdragora::init; @@ -1464,7 +1465,7 @@ sub readMedia { ## NOTE anaselli: next lines add check icon to cells, but they are 8x8, a dimension should ## be evaluated by font size, so disabled atm # my $cell = $item->cell(0); # Checked -# my $checkedIcon = File::ShareDir::dist_file('AdminPanel', 'images/Check_8x8.png'); +# my $checkedIcon = File::ShareDir::dist_file(AdminPanel::Shared::distName(), 'images/Check_8x8.png'); # # $cell->setIconName($checkedIcon) if (!$_->{ignore}); # $cell = $item->cell(1); # Updates @@ -1667,8 +1668,8 @@ sub mainwindow() { $hbox = $factory->createHBox( $vbox_commands ); ## TODO icon and label for ncurses - my $upIcon = File::ShareDir::dist_file('AdminPanel', 'images/Up_16x16.png'); - my $downIcon = File::ShareDir::dist_file('AdminPanel', 'images/Down_16x16.png'); + my $upIcon = File::ShareDir::dist_file(AdminPanel::Shared::distName(), 'images/Up_16x16.png'); + my $downIcon = File::ShareDir::dist_file(AdminPanel::Shared::distName(), 'images/Down_16x16.png'); my $upButton = $factory->createPushButton($factory->createHBox($hbox), $loc->N("Up")); my $downButton = $factory->createPushButton($factory->createHBox($hbox), $loc->N("Down")); $upButton->setIcon($upIcon); -- cgit v1.2.1