[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/org-auto-tangle c32e28cee3 1/4: Move `save-excursion` outs
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/org-auto-tangle c32e28cee3 1/4: Move `save-excursion` outside of `save-restriction` |
Date: |
Thu, 14 Jul 2022 23:58:44 -0400 (EDT) |
branch: elpa/org-auto-tangle
commit c32e28cee300606233ec48060caa0ce88a44e01c
Author: yilkalargaw <yilkalargawworkneh@gmail.com>
Commit: yilkalargaw <yilkalargawworkneh@gmail.com>
Move `save-excursion` outside of `save-restriction`
Move `save-excursion` outside of `save-restriction` as recommended by
`save-restriction`.
Patch sent by Stefan Monnier <monnier@iro.umontreal.ca> on 2022-07-13
---
org-auto-tangle.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/org-auto-tangle.el b/org-auto-tangle.el
index 50b22e9ebe..aeb15a9ba1 100644
--- a/org-auto-tangle.el
+++ b/org-auto-tangle.el
@@ -67,9 +67,9 @@ for a specific file, add its full path to this list.")
(defun org-auto-tangle-find-value (buffer)
"Search the `auto_tangle' property in BUFFER and extracts it when found."
(with-current-buffer buffer
- (save-restriction
- (widen)
- (save-excursion
+ (save-excursion
+ (save-restriction
+ (widen)
(goto-char (point-min))
(when (re-search-forward (org-make-options-regexp '("auto_tangle"))
nil :noerror)
(match-string 2))))))