aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--AdminPanel/Rpmdragora/icon.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/AdminPanel/Rpmdragora/icon.pm b/AdminPanel/Rpmdragora/icon.pm
index 11e51ef8..38ed61ca 100644
--- a/AdminPanel/Rpmdragora/icon.pm
+++ b/AdminPanel/Rpmdragora/icon.pm
@@ -28,6 +28,7 @@ use strict;
our @ISA = qw(Exporter);
use lib qw(/usr/lib/libDrakX);
use common;
+use POSIX;
# TO WORKAROUND LOCALIZATION ISSUE
use AdminPanel::Rpmdragora::localization;
@@ -224,7 +225,7 @@ my %group_icons = (
sub get_icon {
my ($group, $parent) = @_;
my $path;
- if($parent == 0){
+ if(isdigit($parent) && $parent == 0){
$path = '/usr/share/icons/';
}else{
$path = '/usr/share/icons/mini/';