Update of /cvsroot/fink/fink/perlmod/Fink
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14943/perlmod/Fink

Modified Files:
        ChangeLog PkgVersion.pm 
Log Message:
woops, don't break things

Index: PkgVersion.pm
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/PkgVersion.pm,v
retrieving revision 1.538
retrieving revision 1.539
diff -u -d -r1.538 -r1.539
--- PkgVersion.pm       21 Mar 2006 22:57:57 -0000      1.538
+++ PkgVersion.pm       21 Mar 2006 23:33:16 -0000      1.539
@@ -539,7 +539,6 @@
        # path handling
        if ($filename) {
                @parts = split(/\//, $filename);
-               shift @parts if $parts[0] eq ''; # scrap detritus from leading /
                pop @parts;             # remove filename
                $self->{_patchpath} = join("/", @parts);
                for ($finkinfo_index = $#parts;
@@ -570,7 +569,8 @@
                        }
                        
                        # determine the full package tree, eg: [ qw(stable 
main) ]
-                       $self->{_full_trees} = [ [ @parts[3..$finkinfo_index-1] 
] ];
+                       # front (removed): '', %p, 'fink', 'dists'
+                       $self->{_full_trees} = [ [ @parts[4..$finkinfo_index-1] 
] ];
                }
        } else {
                # for dummy descriptions generated from dpkg status data alone

Index: ChangeLog
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/ChangeLog,v
retrieving revision 1.1284
retrieving revision 1.1285
diff -u -d -r1.1284 -r1.1285
--- ChangeLog   21 Mar 2006 23:03:23 -0000      1.1284
+++ ChangeLog   21 Mar 2006 23:33:16 -0000      1.1285
@@ -1,3 +1,7 @@
+2006-03-21  Dave Vasilevsky  <[EMAIL PROTECTED]>
+
+       * PkgVersion.pm: Don't break everything.
+
 2006-03-21  Dave Morrison  <[EMAIL PROTECTED]>
 
        * FinkVersion.pm.in: new function default_binary_version



-------------------------------------------------------
This SF.Net email is sponsored by xPML, a groundbreaking scripting language
that extends applications into web and mobile media. Attend the live webcast
and join the prime developer group breaking into this new coding territory!
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=110944&bid=241720&dat=121642
_______________________________________________
Fink-commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/fink-commits

Reply via email to