The following commit has been merged in the master branch:
commit c09b68139b2a587259a0daa9ea08f57e36b4e7a4
Author: James McCoy <[email protected]>
Date:   Tue Oct 25 21:00:48 2011 -0400

    dd-list: Sort results by full-name instead of trying to parse the names.
    
    Closes: #638602
    Signed-off-by: James McCoy <[email protected]>

diff --git a/debian/changelog b/debian/changelog
index 1c8c6a2..b7ea90a 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -26,6 +26,8 @@ devscripts (2.11.2) UNRELEASED; urgency=low
     (Closes: #644983)
   * dd-list:
     + Correctly handle maintainer names which have a comma.  (Closes: #646562)
+    + Sort results by full-name instead of trying to parse the names.
+      (Closes: #638602)
 
   [ Stefano Rivera ]
   * debchange: Add precise as a recognised Ubuntu distro.
diff --git a/scripts/dd-list.pl b/scripts/dd-list.pl
index dd7bf23..7b233dc 100755
--- a/scripts/dd-list.pl
+++ b/scripts/dd-list.pl
@@ -50,23 +50,10 @@ sub get_developers_given_package {
        return ($developer, \@uploaders, $print_name);
 }
 
-sub parse_developer {
-       my $developer=shift;
-
-       my ($name, $domain) = $developer=~/^(.*)\s+<.*@(.*)>\s*$/i;
-       if (defined $domain && $domain !~ 
/^(lists(\.alioth)?\.debian\.org|teams\.debian\.net)$/) {
-               return join " ", reverse split " ", $name;
-       }
-       elsif (defined $name) {
-               return $name;
-       }
-       else {
-               return $developer;
-       }
-}
-
 sub sort_developers {
-       sort { uc(parse_developer($a)) cmp uc(parse_developer($b)) } @_;
+    return map { $_->[0] }
+          sort { $a->[1] cmp $b->[1] }
+          map { [$_, uc] } @_;
 }
 
 sub help {

-- 
Git repository for devscripts


-- 
To unsubscribe, send mail to [email protected].

Reply via email to