emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/compat 3ff527d6c2 2/5: Simplify buffer-local-boundp


From: ELPA Syncer
Subject: [elpa] externals/compat 3ff527d6c2 2/5: Simplify buffer-local-boundp
Date: Fri, 8 Sep 2023 12:57:31 -0400 (EDT)

branch: externals/compat
commit 3ff527d6c2eb004074a9e8788d9b44eaae8c850a
Author: Mattias EngdegÄrd <mattiase@acm.org>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Simplify buffer-local-boundp
---
 compat-28.el | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/compat-28.el b/compat-28.el
index 7081e332d9..f878538d84 100644
--- a/compat-28.el
+++ b/compat-28.el
@@ -354,11 +354,10 @@ REPLACEMENT can use the following special elements:
 (compat-defun buffer-local-boundp (symbol buffer) ;; 
<compat-tests:buffer-local-boundp>
   "Return non-nil if SYMBOL is bound in BUFFER.
 Also see `local-variable-p'."
-  (catch 'fail
-    (condition-case nil
-        (buffer-local-value symbol buffer)
-      (void-variable nil (throw 'fail nil)))
-    t))
+  (condition-case nil
+      (progn (buffer-local-value symbol buffer)
+             t)
+    (void-variable nil)))
 
 (compat-defmacro with-existing-directory (&rest body) ;; 
<compat-tests:with-existing-directory>
   "Execute BODY with `default-directory' bound to an existing directory.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]