The branch, master has been updated
       via  6e8f108687e20e1d37df77ffb639ccf280fe2a42 (commit)
      from  5ed0fd3d311156806074edabb0604a6f3c93f5ce (commit)


- Shortlog ------------------------------------------------------------
6e8f108 Dpkg::Shlibs::Objdump: fix checks in is_executable() and 
is_public_library()

Summary of changes:
 ChangeLog                      |    5 +++++
 debian/changelog               |    4 +++-
 scripts/Dpkg/Shlibs/Objdump.pm |    6 +++---
 3 files changed, 11 insertions(+), 4 deletions(-)
-----------------------------------------------------------------------
Details of changes:

commit 6e8f108687e20e1d37df77ffb639ccf280fe2a42
Author: Raphael Hertzog <[EMAIL PROTECTED]>
Date:   Wed Nov 21 09:53:42 2007 +0100

    Dpkg::Shlibs::Objdump: fix checks in is_executable() and is_public_library()

diff --git a/ChangeLog b/ChangeLog
index 1bf9e46..caaab77 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2007-11-21  Raphael Hertzog  <[EMAIL PROTECTED]>
+
+       * scripts/Dpkg/Shlibs/Objdump.pm: Fix the checks in is_executable() and
+       is_public_library().
+
 2007-11-20  Guillem Jover  <[EMAIL PROTECTED]>
 
        * configure.ac: Bump version to 1.14.10~.
diff --git a/debian/changelog b/debian/changelog
index c3f6e57..63e2cdd 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,6 +1,8 @@
 dpkg (1.14.10) UNRELEASED; urgency=low
 
-  *
+  [ Raphael Hertzog ]
+  * dpkg-shlibdeps now correctly identify private libraries (avoid many
+    warnings with perl/python modules).
 
   [ Updated man pages translations ]
   * Swedish (Peter Karlsson)
diff --git a/scripts/Dpkg/Shlibs/Objdump.pm b/scripts/Dpkg/Shlibs/Objdump.pm
index 7b3248a..37f201f 100644
--- a/scripts/Dpkg/Shlibs/Objdump.pm
+++ b/scripts/Dpkg/Shlibs/Objdump.pm
@@ -326,13 +326,13 @@ sub get_needed_libraries {
 
 sub is_executable {
     my $self = shift;
-    return exists $self->{flags}{EXEC_P} and $self->{flags}{EXEC_P};
+    return exists $self->{flags}{EXEC_P} && $self->{flags}{EXEC_P});
 }
 
 sub is_public_library {
     my $self = shift;
-    return exists $self->{flags}{DYNAMIC} and $self->{flags}{DYNAMIC}
-       and exists $self->{SONAME} and $self->{SONAME};
+    return exists $self->{flags}{DYNAMIC} && $self->{flags}{DYNAMIC}
+       && exists $self->{SONAME} && $self->{SONAME});
 }
 
 1;

-- 
dpkg's main repository


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Reply via email to