branch: elpa/doc-show-inline
commit 795ce5c7d45e90e681a2dee7c90f24a54c4b3ab1
Author: Campbell Barton <ideasma...@gmail.com>
Commit: Campbell Barton <ideasma...@gmail.com>
Cleanup: use incf
---
doc-show-inline.el | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/doc-show-inline.el b/doc-show-inline.el
index 6f8cd22aea8..7d520229012 100644
--- a/doc-show-inline.el
+++ b/doc-show-inline.el
@@ -352,8 +352,7 @@ the point should not be moved by this function."
;; so `looking-at-p' works as expected.
(goto-char (pos-bol))
(while (and (looking-at-p "[[:blank:]]*$")
- (< (setq blank-lines (1+ blank-lines))
- doc-show-inline-exclude-blank-lines)
+ (< (incf blank-lines)
doc-show-inline-exclude-blank-lines)
(zerop (forward-line -1)))))
(eq blank-lines doc-show-inline-exclude-blank-lines)))
