Changeset 362

Timestamp:

02/07/11 02:15:38 (13 years ago)

Author:

nanardon

Message:

• sort rpm using intelligent way

Location:

server/trunk/web/lib/Sophie

Files:

• Scan.pm (modified) (1 diff)
• Scan/RpmsPath.pm (modified) (1 diff)

server/trunk/web/lib/Sophie/Scan.pm

@@ -62 +62 @@
             next;
         }
-        warn "$$ Updating Meta $_";
         my $meta = "Sophie::Scan::MetaPath::$type"->new($self, $_);
         $meta->run();

server/trunk/web/lib/Sophie/Scan/RpmsPath.pm

@@ -93 +93 @@
     }
     sort { $a->{delta} eq $b->{delta} 
-        ? $a->{mtime} <=> $b->{mtime}
-        : ($a->{delta} eq 'A' ? 1 : -1)
+        ? ($a->{mtime} <=> $b->{mtime})
+        : ($a->{delta} cmp $b->{delta})
     } @delta;
 }