branch: elpa/mastodon
commit 3d8c8bb64df38ba755925bfdf68abddd6042a7c9
Author: marty hiatt <martianhia...@disroot.org>
Commit: marty hiatt <martianhia...@disroot.org>

    client: plstore read funs: close plstore at end
---
 lisp/mastodon-client.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/lisp/mastodon-client.el b/lisp/mastodon-client.el
index 4895e84363..716ea7ad61 100644
--- a/lisp/mastodon-client.el
+++ b/lisp/mastodon-client.el
@@ -129,6 +129,7 @@ Make `mastodon-client--fetch' call to determine client 
values."
          (mastodon
           (plstore-get plstore
                        (concat "mastodon-" mastodon-instance-url))))
+    (plstore-close plstore)
     (mastodon-client--remove-key-from-plstore mastodon)))
 
 (defun mastodon-client--general-read (key)
@@ -136,6 +137,7 @@ Make `mastodon-client--fetch' call to determine client 
values."
 Return plist without the KEY."
   (let* ((plstore (plstore-open (mastodon-client--token-file)))
          (plstore-item (plstore-get plstore key)))
+    (plstore-close plstore)
     (mastodon-client--remove-key-from-plstore plstore-item)))
 
 (defun mastodon-client--make-user-details-plist ()

Reply via email to