diff options
author | Thierry Vignaud <tv@mandriva.org> | 2008-09-25 15:17:43 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mandriva.org> | 2008-09-25 15:17:43 +0000 |
commit | 2ce61f0ed91baba96c7cad8eb57a18708f6af823 (patch) | |
tree | c27e856e76b495eff52955d7971313ff364a5b9f | |
parent | f8af2653518b1e3b7bd1fdf51882b414181f3962 (diff) | |
download | control-center-2ce61f0ed91baba96c7cad8eb57a18708f6af823.tar control-center-2ce61f0ed91baba96c7cad8eb57a18708f6af823.tar.gz control-center-2ce61f0ed91baba96c7cad8eb57a18708f6af823.tar.bz2 control-center-2ce61f0ed91baba96c7cad8eb57a18708f6af823.tar.xz control-center-2ce61f0ed91baba96c7cad8eb57a18708f6af823.zip |
lazy load Gtk2::Pango when requested (ligher startup)
-rwxr-xr-x | control-center | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/control-center b/control-center index 95204384..532ef339 100755 --- a/control-center +++ b/control-center @@ -34,7 +34,6 @@ use lang; BEGIN { unshift @::textdomains, 'drakconf' } use mygtk2 qw(gtknew); use ugtk2 qw(:create :dialogs :helpers :wrappers); -use Gtk2::Pango; use Gtk2::WebKit; use MDV::Control_Center; @@ -1341,6 +1340,7 @@ sub about_mdk_cc() { my ($previous_type, $not_first_title, $not_first_block); my $locale = lang::read; + require Gtk2::Pango; foreach my $line (grep { $_ ne "\n" && !/^#/ } cat_(top(glob("/usr/share/doc/mandriva-release-*/CREDITS"), glob("/usr/share/doc/mandriva-release-*/CREDITS.$locale->{lang}")))) { $line =~ s/ Limited Edition 2005 \|//; if (my ($type, $comment, $contributor) = split(/\|/, $line, 3)) { |