Fix series sorting
* calibre-book.el (calibre-book-sort-by-series): Fix sorting order. * calibre.el: Bump version number. * etc/NEWS: Mention fix to sorting.
This commit is contained in:
parent
06d6a97bf3
commit
855a9cb092
|
@ -88,12 +88,12 @@
|
|||
t
|
||||
(if (not (calibre-book-series b))
|
||||
nil
|
||||
(cl-case (compare-strings (calibre-book-series a) nil nil
|
||||
(calibre-book-series b) nil nil)
|
||||
(-1 t)
|
||||
((eq t) (< (calibre-book-series-index a)
|
||||
(calibre-book-series-index b)))
|
||||
(1 nil)))))
|
||||
(let ((v (compare-strings (calibre-book-series a) nil nil
|
||||
(calibre-book-series b) nil nil)))
|
||||
(if (numberp v)
|
||||
(< v 0)
|
||||
(< (calibre-book-series-index a)
|
||||
(calibre-book-series-index b)))))))
|
||||
|
||||
(provide 'calibre-book)
|
||||
;;; calibre-book.el ends here
|
||||
|
|
|
@ -4,7 +4,7 @@
|
|||
|
||||
;; Author: Kjartan Oli Agustsson <kjartanoli@disroot.org>
|
||||
;; Maintainer: Kjartan Oli Agustsson <kjartanoli@disroot.org>
|
||||
;; Version: 1.4.0
|
||||
;; Version: 1.4.1
|
||||
;; Package-Requires: ((emacs "27.1") (compat "29.1.4.1"))
|
||||
;; URL: https://git.disroot.org/kjartanoli/calibre.el
|
||||
|
||||
|
|
Loading…
Reference in New Issue