branch: externals/greader
commit 813a824faca45f76ca53c0e7a92192eb08b1dcb8
Author: Michelangelo Rodriguez <[email protected]>
Commit: Michelangelo Rodriguez <[email protected]>
greader-dict.el: fixed
Now filters are updated correctly with
`greader-dict-change-dictionary'.
---
greader-dict.el | 9 ++++++++-
1 file changed, 8 insertions(+), 1 deletion(-)
diff --git a/greader-dict.el b/greader-dict.el
index f2e7037525..a6b0690e5f 100644
--- a/greader-dict.el
+++ b/greader-dict.el
@@ -408,6 +408,10 @@ user-error and aborts the reading process."
(setq greader-dict-filename (buffer-local-value
'greader-dict-filename
greader-dict--current-reading-buffer))
+ (setq greader-filters (buffer-local-value 'greader-filters
+
greader-dict--current-reading-buffer))
+ (setq greader-dict-toggle-filters (buffer-local-value
+ 'greader-dict-toggle-filters
greader-dict--current-reading-buffer))
(insert-file-contents (greader-dict--get-file-name))
(when-let ((lines (string-lines (buffer-string) t)))
(dolist (line lines)
@@ -653,11 +657,14 @@ asked."
greader-dict--saved-flag
t))))
(clrhash greader-dictionary)
+ (clrhash greader-filters)
(greader-dict--set-file (intern new-dict))
(unless (file-exists-p (greader-dict--get-file-name))
(shell-command-to-string
(concat "touch " greader-dict-filename)))
- (greader-dict-read-from-dict-file))))
+ (greader-dict--update)
+ (greader-dict--update))))
+
;; (remove-hook 'buffer-list-update-hook #'greader-dict--update)))))
(defun greader-dict--update ()
