r57068 - /trunk/dh-make-perl/lib/Debian/Dependency.pm

[dmn at users.alioth.debian.org]

Author: dmn
Date: Wed Apr 28 19:28:18 2010
New Revision: 57068

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=57068
Log:
missing quote in POD

Modified:
    trunk/dh-make-perl/lib/Debian/Dependency.pm

Modified: trunk/dh-make-perl/lib/Debian/Dependency.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/dh-make-perl/lib/Debian/Dependency.pm?rev=57068&op=diff
==============================================================================
--- trunk/dh-make-perl/lib/Debian/Dependency.pm (original)
+++ trunk/dh-make-perl/lib/Debian/Dependency.pm Wed Apr 28 19:28:18 2010
@@ -24,7 +24,7 @@
    my $d = Debian::Dependency->new( 'perl', '>=', '5.10' );
 
    print $d->pkg;  # 'perl'
-   print $d->ver;  # '5.10
+   print $d->ver;  # '5.10'
 
                                     # for people who like to type much
    my $d = Debian::Dependency->new( { pkg => 'perl', ver => '5.10' } );
@@ -333,7 +333,9 @@
 
 =item ver
 
-Contains the version of the package the dependency is about.
+Contains the version of the package the dependency is about. The value is an
+instance of L<Dpkg::Version> class. If you set it to a scalar value, that is
+given to L<Dpkg::Version>->new().
 
 =back
 
@@ -400,7 +402,7 @@
     return 0 if not $self->rel;
 
     # from this point below both $dep and we have relation (and version)
-    my $cmpver = deb_ver_cmp( $self->ver, $dep->ver );
+    my $cmpver = ( $self->ver <=> $dep->ver );
 
     if( $self->rel eq '>>' ) {
         # >> 4 satisfies also >> 3
@@ -495,7 +497,7 @@
 
 =over 4
 
-=item Copyright (C) 2008,2009 Damyan Ivanov <dmn at debian.org>
+=item Copyright (C) 2008,2009,2010 Damyan Ivanov <dmn at debian.org>
 
 =back