From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Mon, 20 Dec 2021 09:29:50 +0000 (+0100)
Subject: Use the new `permission-denied' error to catch multisession errors
X-Git-Tag: emacs-29.0.90~3537
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6def36f2160b0333343b0fb316b36c159e1e9c72;p=emacs.git

Use the new `permission-denied' error to catch multisession errors

* lisp/emacs-lisp/multisession.el (multisession--read-file-value):
Use the new `permission-denied' error to catch file errors on Windows.
---

diff --git a/lisp/emacs-lisp/multisession.el b/lisp/emacs-lisp/multisession.el
index 6ef0da10f77..4bd7886d35e 100644
--- a/lisp/emacs-lisp/multisession.el
+++ b/lisp/emacs-lisp/multisession.el
@@ -269,7 +269,7 @@ DOC should be a doc string, and ARGS are keywords as applicable to
           ;; Windows uses OS-level file locking that may preclude
           ;; reading the file in some circumstances.  So when that
           ;; happens, wait a bit and try again.
-          (file-error
+          (permission-denied
            (setq i (1+ i)
                  last-error err)
            (sleep-for (+ 0.1 (/ (float (random 10)) 10))))))