diff options
| -rw-r--r-- | bin/bibsort.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/bin/bibsort.pl b/bin/bibsort.pl index 89133c87..0d132c19 100644 --- a/bin/bibsort.pl +++ b/bin/bibsort.pl @@ -26,7 +26,7 @@ while (<>) { sub byLast { my ($af, $al) = split /\s(\S+)(,.*)?$/, $a; my ($bf, $bl) = split /\s(\S+)(,.*)?$/, $b; - $al cmp $bl || $af cmp $bf; + ($al // $af) cmp ($bl // $bf) || $af cmp $bf; } foreach $ref (@refs) { |