diff options
author | Maximiliano Curia <maxy@debian.org> | 2015-09-11 16:00:15 +0200 |
---|---|---|
committer | Maximiliano Curia <maxy@debian.org> | 2015-09-11 16:00:15 +0200 |
commit | b84ca01945059fbb0086dd50a9a260e3664fd97a (patch) | |
tree | c272dad5e7a703ef466b88c4343e6ae91875a991 /pkgkde-gensymbols | |
parent | c0d9709a200caa4f472ee8a7acf1735712633768 (diff) | |
download | pkg-kde-tools-b84ca01945059fbb0086dd50a9a260e3664fd97a.tar.gz |
Drop stale copy of Dpkg/Shlibs (2010-02-21).
Diffstat (limited to 'pkgkde-gensymbols')
-rwxr-xr-x | pkgkde-gensymbols | 38 |
1 files changed, 15 insertions, 23 deletions
diff --git a/pkgkde-gensymbols b/pkgkde-gensymbols index 336db1e..0f0a065 100755 --- a/pkgkde-gensymbols +++ b/pkgkde-gensymbols @@ -19,7 +19,7 @@ use strict; use warnings; use Dpkg; -use Debian::PkgKde qw(setup_datalibdir find_exe_in_path); +use Debian::PkgKde qw(find_exe_in_path); my $old_symbolfile_parse; @@ -53,31 +53,23 @@ sub check_dpkg_version { } my $exe = find_exe_in_path("dpkg-gensymbols", $0); +unless ($exe) { + print STDERR "pkgkde-gensymbols: dpkg-gensymbols could not be found in PATH", "\n"; + exit 1; +} -# Export global datalibdir if needed -my $dir = setup_datalibdir(qw(Dpkg/Shlibs/SymbolFile.pm)); -if (defined $dir) { - unless ($exe) { - print STDERR "pkgkde-gensymbols: dpkg-gensymbols could not be found in PATH", "\n"; - exit 1; - } - - eval "use Dpkg::Shlibs::SymbolFile"; - eval "use Debian::PkgKde::SymbolsHelper::Symbol"; +eval "use Dpkg::Shlibs::SymbolFile"; +eval "use Debian::PkgKde::SymbolsHelper::Symbol"; - # Replace Dpkg::Shlibs::SymbolFile::load with a custom version - # which uses Debian::PkgKde::SymbolsHelper::Symbol rather than - # Dpkg::Shlibs::Symbol - $old_symbolfile_parse = *Dpkg::Shlibs::SymbolFile::parse; - *Dpkg::Shlibs::SymbolFile::parse = *new_symbolfile_parse; +# Replace Dpkg::Shlibs::SymbolFile::load with a custom version +# which uses Debian::PkgKde::SymbolsHelper::Symbol rather than +# Dpkg::Shlibs::Symbol +$old_symbolfile_parse = *Dpkg::Shlibs::SymbolFile::parse; +*Dpkg::Shlibs::SymbolFile::parse = *new_symbolfile_parse; - # Finally, run stock dpkg-gensymbols - unless (do $exe) { - print STDERR $@; - exit 1; - } -} else { - print STDERR "pkgkde-gensymbols: unable to determine execution context.", "\n"; +# Finally, run stock dpkg-gensymbols +unless (do $exe) { + print STDERR $@; exit 1; } |