storm/w3m
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

[w3m-dev 03736] dirlist sort

Browse Source 
* scripts/dirlist.cgi.in (right_dir): use cmp for filename comparison
From: Hiroyuki Ito <hito@crl.go.jp>
This commit is contained in:
Fumitoshi UKAI
2003-02-07 15:06:15 +00:00
parent 6c6278af7f
commit c71b4fd2e8
2 changed files with 8 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
ChangeLog
View File

@@ -1,3 +1,8 @@
2003-02-08 Hiroyuki Ito <hito@crl.go.jp>
* [w3m-dev 03736] dirlist sort
* scripts/dirlist.cgi.in (right_dir): use cmp for filename comparison
2003-02-07 Hironori SAKAMOTO <hsaka@mth.biglobe.ne.jp>
* [w3m-dev 03735] Re: make error of checkType arg
@@ -7118,4 +7123,4 @@ a * [w3m-dev 03276] compile error on EWS4800
* release-0-2-1
* import w3m-0.2.1
$Id: ChangeLog,v 1.742 2003/02/06 17:21:42 ukai Exp $
$Id: ChangeLog,v 1.743 2003/02/07 15:06:15 ukai Exp $

4
scripts/dirlist.cgi.in
View File

@@ -277,9 +277,9 @@ sub right_dir {
}
closedir(DIR);
if ($SORT eq $SORT_SIZE) {
@list = sort { $sizes{$b} <=> $sizes{$a} || $a <=> $b } @list;
@list = sort { $sizes{$b} <=> $sizes{$a} || $a cmp $b } @list;
} elsif ($SORT eq $SORT_TIME) {
@list = sort { $ctimes{$b} <=> $ctimes{$a} || $a <=> $b } @list;
@list = sort { $ctimes{$b} <=> $ctimes{$a} || $a cmp $b } @list;
} else {
@list = sort @list;
}