diff options
| author | Ulf Jasper | 2022-08-11 13:26:52 +0200 |
|---|---|---|
| committer | Ulf Jasper | 2022-08-11 13:34:18 +0200 |
| commit | f7438fc8597f5a3a06e44cd2361d3fdffdb0f07d (patch) | |
| tree | 066fd8afaf780d38857b97c25fcd67c9dd4d1dba | |
| parent | a2ecf73545bcab598de8c8996c5591d6ffa5d1fc (diff) | |
| download | emacs-f7438fc8597f5a3a06e44cd2361d3fdffdb0f07d.tar.gz emacs-f7438fc8597f5a3a06e44cd2361d3fdffdb0f07d.zip | |
newsticker: fix bug#57045
* lisp/net/newst-treeview.el
(newsticker--treeview-list-items-with-age) (newsticker-treeview-update):
Fix issues with changing sort order in virtual feed 'all' (Bug#57045).
| -rw-r--r-- | lisp/net/newst-treeview.el | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/lisp/net/newst-treeview.el b/lisp/net/newst-treeview.el index 637f53e6550..e98767ae7c7 100644 --- a/lisp/net/newst-treeview.el +++ b/lisp/net/newst-treeview.el | |||
| @@ -361,7 +361,8 @@ AGES is the list of ages that are to be shown." | |||
| 361 | (mapc (lambda (feed) | 361 | (mapc (lambda (feed) |
| 362 | (let ((feed-name-symbol (intern (car feed)))) | 362 | (let ((feed-name-symbol (intern (car feed)))) |
| 363 | (mapc (lambda (item) | 363 | (mapc (lambda (item) |
| 364 | (when (memq (newsticker--age item) ages) | 364 | (when (or (memq 'all ages) |
| 365 | (memq (newsticker--age item) ages)) | ||
| 365 | (newsticker--treeview-list-add-item | 366 | (newsticker--treeview-list-add-item |
| 366 | item feed-name-symbol t))) | 367 | item feed-name-symbol t))) |
| 367 | (newsticker--treeview-list-sort-items | 368 | (newsticker--treeview-list-sort-items |
| @@ -1218,11 +1219,11 @@ Note: does not update the layout." | |||
| 1218 | (newsticker--treeview-list-update t) | 1219 | (newsticker--treeview-list-update t) |
| 1219 | (newsticker--treeview-item-update) | 1220 | (newsticker--treeview-item-update) |
| 1220 | (newsticker--treeview-tree-update-tags) | 1221 | (newsticker--treeview-tree-update-tags) |
| 1221 | (cond (newsticker--treeview-current-feed | 1222 | (cond (newsticker--treeview-current-vfeed |
| 1222 | (newsticker--treeview-list-items newsticker--treeview-current-feed)) | ||
| 1223 | (newsticker--treeview-current-vfeed | ||
| 1224 | (newsticker--treeview-list-items-with-age | 1223 | (newsticker--treeview-list-items-with-age |
| 1225 | (intern newsticker--treeview-current-vfeed)))) | 1224 | (intern newsticker--treeview-current-vfeed))) |
| 1225 | (newsticker--treeview-current-feed | ||
| 1226 | (newsticker--treeview-list-items newsticker--treeview-current-feed))) | ||
| 1226 | (newsticker--treeview-tree-update-highlight) | 1227 | (newsticker--treeview-tree-update-highlight) |
| 1227 | (newsticker--treeview-list-update-highlight) | 1228 | (newsticker--treeview-list-update-highlight) |
| 1228 | (let ((cur-feed (or newsticker--treeview-current-feed | 1229 | (let ((cur-feed (or newsticker--treeview-current-feed |