w3m

Unnamed repository; edit this file to name it for gitweb.
git clone https://logand.com/git/w3m.git/
Log | Files | Refs | README

commit 42eebe032219d99eb534507bf546c9dec7e19549
parent 49fee903652f767f7b9c11832bbb542e968ca437
Author: ukai <ukai>
Date:   Fri,  7 Feb 2003 15:06:15 +0000

[w3m-dev 03736] dirlist sort
* scripts/dirlist.cgi.in (right_dir): use cmp for filename comparison
From: Hiroyuki Ito <hito@crl.go.jp>

Diffstat:
MChangeLog | 5+++++
Mscripts/dirlist.cgi.in | 4++--
2 files changed, 7 insertions(+), 2 deletions(-)

diff --git a/ChangeLog b/ChangeLog @@ -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 diff --git a/scripts/dirlist.cgi.in b/scripts/dirlist.cgi.in @@ -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; }