aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorfuzzyray <fuzzyray@gentoo.org>2009-05-01 17:39:18 +0000
committerfuzzyray <fuzzyray@gentoo.org>2009-05-01 17:39:18 +0000
commitd260a81f203731c53c7497420a1a50a3a5d0ab6f (patch)
tree7eae7d2ef0262e70459d12972d8555eb15972cbf
parentFix typo in Makefile (diff)
downloadgentoolkit-d260a81f203731c53c7497420a1a50a3a5d0ab6f.tar.gz
gentoolkit-d260a81f203731c53c7497420a1a50a3a5d0ab6f.tar.bz2
gentoolkit-d260a81f203731c53c7497420a1a50a3a5d0ab6f.zip
Add GLEP 53 keywords sorting patch from prefix
svn path=/; revision=569
-rwxr-xr-xtrunk/src/ekeyword/ekeyword4
1 files changed, 4 insertions, 0 deletions
diff --git a/trunk/src/ekeyword/ekeyword b/trunk/src/ekeyword/ekeyword
index 2e49ac0..002e44b 100755
--- a/trunk/src/ekeyword/ekeyword
+++ b/trunk/src/ekeyword/ekeyword
@@ -99,6 +99,10 @@ for my $f (@ARGV) {
(my $sb = $b) =~ s/^\W//;
return -1 if $sa eq '*';
return +1 if $sb eq '*';
+ $sa .= "-";
+ $sb .= "-";
+ $sa =~ s/([a-z0-9]+)-([a-z0-9]*)/$2-$1/g;
+ $sb =~ s/([a-z0-9]+)-([a-z0-9]*)/$2-$1/g;
$sa cmp $sb;
} split " ", $quoted;