Update of /cvsroot/fink/fink/perlmod/Fink
In directory sc8-pr-cvs1:/tmp/cvs-serv21002/perlmod/Fink

Modified Files:
        Package.pm 
Log Message:
Adding back a minor fix

Index: Package.pm
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/Package.pm,v
retrieving revision 1.27
retrieving revision 1.28
diff -u -r1.27 -r1.28
--- Package.pm  14 Jan 2003 14:08:59 -0000      1.27
+++ Package.pm  14 Jan 2003 14:50:47 -0000      1.28
@@ -112,7 +112,8 @@
   my $version_object = shift;
 
   my $version = $version_object->get_fullversion();
-  if (exists $self->{_versions}->{$version}) {
+  if (exists $self->{_versions}->{ $version} 
+    && $self->{_versions}->{ $version}->{_type} eq 'dummy' ) {
     $self->{_versions}->{$version}->merge($version_object);
   } else {
     $self->{_versions}->{$version} = $version_object;



-------------------------------------------------------
This SF.NET email is sponsored by: FREE  SSL Guide from Thawte
are you planning your Web Server Security? Click here to get a FREE
Thawte SSL guide and find the answers to all your  SSL security issues.
http://ads.sourceforge.net/cgi-bin/redirect.pl?thaw0026en
_______________________________________________
Fink-commits mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/fink-commits

Reply via email to