From: rearman <rearman@r717.net>
Date: Tue, 17 Mar 2026 15:28:52 +0000 (-0400)
Subject: Only visual movements when visual-line-mode is active
X-Git-Url: https://git.earman.xyz/?a=commitdiff_plain;h=44eed71afef69559ad9f4d97d2c27d09fd1de105;p=emacsinit.git

Only visual movements when visual-line-mode is active
---

diff --git a/re/re-editing-defuns.el b/re/re-editing-defuns.el
index 4a70985..b045bb6 100644
--- a/re/re-editing-defuns.el
+++ b/re/re-editing-defuns.el
@@ -73,7 +73,7 @@ If in org-mode, call `org-beginning-of-line' first."
     (if (equal major-mode 'org-mode)
 	(org-beginning-of-line)
       (progn
-	(beginning-of-visual-line 1)
+	(when visual-line-mode (beginning-of-visual-line 1))
 	(skip-syntax-forward " " (line-end-position))
 	(backward-prefix-chars)))
     (and (= oldpos (point))
@@ -89,7 +89,8 @@ If in org-mode, call `org-end-of-line' first."
   (let ((oldpos (point)))
     (if (equal major-mode 'org-mode)
 	(org-end-of-line)
-      (end-of-visual-line 1))
+      (when visual-line-mode
+	(end-of-visual-line 1)))
     (and (= oldpos (point)) (move-end-of-line nil))))
 
 (defun re/goto-line ()