diff options
| author | Guillaume Cottenceau <gc@mandriva.com> | 2002-12-05 14:12:15 +0000 |
|---|---|---|
| committer | Guillaume Cottenceau <gc@mandriva.com> | 2002-12-05 14:12:15 +0000 |
| commit | 5b00d8c58fc9c11a3d51820952487161cc8a4da6 (patch) | |
| tree | c75e6ff3fc4e4615e5236009f4514314e1500fba | |
| parent | 50dda33228ca3131595b8c86ec8f1a60a49a61dc (diff) | |
| download | drakx-5b00d8c58fc9c11a3d51820952487161cc8a4da6.tar drakx-5b00d8c58fc9c11a3d51820952487161cc8a4da6.tar.gz drakx-5b00d8c58fc9c11a3d51820952487161cc8a4da6.tar.bz2 drakx-5b00d8c58fc9c11a3d51820952487161cc8a4da6.tar.xz drakx-5b00d8c58fc9c11a3d51820952487161cc8a4da6.zip | |
remove unused $_lan
| -rw-r--r-- | perl-install/ugtk2.pm | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm index dad83a12c..974710666 100644 --- a/perl-install/ugtk2.pm +++ b/perl-install/ugtk2.pm @@ -522,7 +522,6 @@ sub gtktext_insert { sub gtkfontinfo { my ($widget) = @_; my $context = $widget->get_pango_context; - my $_lan = $context->get_language; my $metrics = $context->get_metrics($widget->style->get_font_desc, $context->get_language); my %fontinfo; foreach (qw(ascent descent approximate_char_width approximate_digit_width)) { |