diff options
| author | Christopher Faylor <me@cgf.cx> | 2006-07-05 16:06:50 +0000 |
|---|---|---|
| committer | Christopher Faylor <me@cgf.cx> | 2006-07-05 16:06:50 +0000 |
| commit | 8307a41117b7df653c63df8620d0331e857a4064 (patch) | |
| tree | 5d09c02746c1a4ca1ad49d74e4efca8a50a46826 /winsup/cygwin/sortdin | |
| parent | 03ac0afe48a32d1afc954dc97c67ab2f2134cb4a (diff) | |
| download | cygnal-8307a41117b7df653c63df8620d0331e857a4064.tar.gz cygnal-8307a41117b7df653c63df8620d0331e857a4064.tar.bz2 cygnal-8307a41117b7df653c63df8620d0331e857a4064.zip | |
* sortdin: Ignore all leading underscores when deriving a sort key.
* cygwin.din: Resort.
Diffstat (limited to 'winsup/cygwin/sortdin')
| -rwxr-xr-x | winsup/cygwin/sortdin | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/winsup/cygwin/sortdin b/winsup/cygwin/sortdin index bdb4323aa..dafb329ff 100755 --- a/winsup/cygwin/sortdin +++ b/winsup/cygwin/sortdin @@ -17,7 +17,7 @@ while (<>) { $arr = /\sDATA\s*$/o ? \%data : \%code; $_ =~ s/^\s+//; my $key = (split(' ', $_))[0]; - substr($key, 0, 1) = '' if /^_/o; + substr($key, 0, 1) = '' while $key =~ /^_/o; chomp $key; $arr->{$key}->{$_} = 1; } |