From 559171575e7685463ae6608b6c37caf7c234f89d Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Mon, 11 Mar 2024 03:26:01 -0400 Subject: [PATCH] refactor(lib): doom-region-end: extract marker --- lisp/lib/text.el | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/lisp/lib/text.el b/lisp/lib/text.el index 60a56b47e..cef1a098b 100644 --- a/lisp/lib/text.el +++ b/lisp/lib/text.el @@ -88,10 +88,11 @@ Uses `evil-visual-beginning' if available." "Return end position of selection. Uses `evil-visual-end' if available." (declare (side-effect-free t)) - (if (and (bound-and-true-p evil-local-mode) - (evil-visual-state-p)) - evil-visual-end - (region-end))) + (or (and (bound-and-true-p evil-local-mode) + (evil-visual-state-p) + (markerp evil-visual-end) + (marker-position evil-visual-end)) + (region-end))) ;;;###autoload (defun doom-thing-at-point-or-region (&optional thing prompt)