diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2005-09-08 17:09:59 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2005-09-08 17:09:59 +0000 |
| commit | 09c06faebdbeb97b03b0b571abe198d723c366b7 (patch) | |
| tree | dd6b9b8147e39bee952584127ded87f77d3b4139 /perl-install | |
| parent | 2727ae8ade3aaf3cb624a71edcb667a5d83b1717 (diff) | |
| download | drakx-09c06faebdbeb97b03b0b571abe198d723c366b7.tar drakx-09c06faebdbeb97b03b0b571abe198d723c366b7.tar.gz drakx-09c06faebdbeb97b03b0b571abe198d723c366b7.tar.bz2 drakx-09c06faebdbeb97b03b0b571abe198d723c366b7.tar.xz drakx-09c06faebdbeb97b03b0b571abe198d723c366b7.zip | |
(create_box_with_title) kill that dead code path
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/ugtk2.pm | 20 |
1 files changed, 0 insertions, 20 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm index 407aa223b..722843d7e 100644 --- a/perl-install/ugtk2.pm +++ b/perl-install/ugtk2.pm @@ -332,25 +332,6 @@ sub create_box_with_title { my ($txt) = @_; ref($txt) ? $txt : gtknew('WrappedLabel', text => $txt); }; - if (0 && ($o->{icon} && !$::isWizard || $::isInstall)) { - gtkpack__($box, - gtknew('HBox', children => [ - 0, gtknew('VBox', width => 15), - 0, eval { gtkcreate_img($o->{icon}) }, - 0, gtknew('VBox', width => 15), - 1, $o->{box_title} = gtknew('VBox', children_loose => [ - gtknew('HBox', children => [ - (map { - my $w = $new_label->($_); - $::isWizard and $w->set_justify("left"); - (0, $w); - } @l), - 1, gtknew('HBox'), - ]) ]) - ]), - if_($a, gtknew('HSeparator')) - ); - } else { gtkpack__($box, if_($::isWizard, gtknew('Label', height => 10)), (map { @@ -361,7 +342,6 @@ sub create_box_with_title { if_($::isWizard, gtknew('Label', height => 15)), if_($a, gtknew('HSeparator')), ); - } } } |