fix: order of records returned by plist-group to-list

This commit is contained in:
contrapunctus 2021-12-05 22:16:30 +05:30
parent c70a7791b0
commit 975b67af1f
2 changed files with 4 additions and 2 deletions

View File

@ -1493,7 +1493,8 @@ Return
;; [[file:chronometrist.org::*to-list][to-list:1]]
(cl-defmethod chronometrist-to-list ((backend chronometrist-plist-group-backend))
(chronometrist-loop-sexp-file for expr in (chronometrist-backend-file backend) append (rest expr)))
(chronometrist-loop-sexp-file for expr in (chronometrist-backend-file backend)
append (reverse (rest expr))))
;; to-list:1 ends here
;; [[file:chronometrist.org::*to-hash-table][to-hash-table:1]]

View File

@ -2337,7 +2337,8 @@ We apply the same hack as in the [[<<hack-note-plist-group-insert>>][insert]] me
**** to-list :reader:method:
#+BEGIN_SRC emacs-lisp
(cl-defmethod chronometrist-to-list ((backend chronometrist-plist-group-backend))
(chronometrist-loop-sexp-file for expr in (chronometrist-backend-file backend) append (rest expr)))
(chronometrist-loop-sexp-file for expr in (chronometrist-backend-file backend)
append (reverse (rest expr))))
#+END_SRC
**** to-hash-table :reader:method: