Addresses #33. Remove the superfluous (setq found nil) in adoc-kw-rep…

…lacement
bbatsov · Aug 3, 2023 · f68c4b9 · f68c4b9
1 parent 2578d9a
commit f68c4b9
Showing 1 changed file with 1 addition and 3 deletions.
diff --git a/adoc-mode.el b/adoc-mode.el
@@ -1902,10 +1902,8 @@ meta characters."
  ;; matcher function
  (lambda (end)
  (let (found)
- (while (and (setq found
- (adoc-kwf-search ,regexp end t))
+ (while (and (setq found (adoc-kwf-search ,regexp end t))
  (text-property-not-all (match-beginning 1) (match-end 1) 'adoc-reserved nil))
- (setq found nil)
  (goto-char (+ (match-beginning 0) 1)))
  (when (and found adoc-insert-replacement ,replacement)
  (let* ((s (cond