branch: externals/greader
commit 813a824faca45f76ca53c0e7a92192eb08b1dcb8
Author: Michelangelo Rodriguez <michelangelo.rodrig...@gmail.com>
Commit: Michelangelo Rodriguez <michelangelo.rodrig...@gmail.com>

    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 ()

Reply via email to