Dpkg::Shlibs:* add more abstract methods and clean up API.

* Make SymbolFile::lookup_*(), SymbolFile::find_matching_pattern() accept both
  symbol/pattern objects AND names.
* Make SymbolFile::lookup_*(), SymbolFile::find_matching_pattern() accept both
  single soname and an array of sonames.
* Make SymbolFile::lookup_*(), SymbolFile::find_matching_pattern() detect
  context and return either a hash of ( soname => .., symbol => .. ) or just a
  scalar symbol reference. In either case, do NOT clone symbols.
* SymbolFile::get_{new,lost}_symbols() returns an array of { soname =>
  .., symbol => .. } hashes where 'symbol' is a real reference, not a clone.
* Add new abstract methods and use them everywhere:
  - SymbolFile::get_arch() - architecture the file is processed under/for.
  - SymbolFile::get_sonames() - names of all sonames.
  - SymbolFile::get_object() - soname object reference by name or object
    reference.
  - SymbolFile::get_symbols($soname) - if $soname is undef, returns ALL
    symbol file symbols.
  - SymbolFile::get_patterns($soname) - if $soname is undef, returns ALL
    symbol file patterns.
  - SymbolFile::get_symbol_object(Ssym, $soname) - a convenience method
    combining both SymbolFile::lookup_{symbol,pattern} methods.
* Make SymbolFile::create_symbol() more flexible. Now it can parse a dummy spec
  without minver.
* Remove Symbol::sclone() as no longer used and needed. Rename Symbol::dclone()
  back to Symbol::clone().

1 files changed, 1 insertions, 1 deletions

diff --git a/scripts/dpkg-gensymbols.pl b/scripts/dpkg-gensymbols.pl
index 98bdfffcc..14b561a0a 100755
--- a/scripts/dpkg-gensymbols.pl
+++ b/scripts/dpkg-gensymbols.pl
@@ -260,7 +260,7 @@ if ($compare) {
 		_g("see diff output below"));
 	$exitcode = 2 if ($compare >= 2);
     }
-    if (my @syms = $symfile->get_lost_symbols($ref_symfile)) {
+    if ($symfile->get_lost_symbols($ref_symfile)) {
 	warning(_g("some symbols or patterns disappeared in the symbols file: %s"),
 	        _g("see diff output below"));
 	$exitcode = 1 if ($compare >= 1);