master 7df898d532: Fix whitespace-tests on macOS

[Gerd Moellmann]

branch: master
commit 7df898d532f922ea2a7acce4446bc35eec1da38e
Author: Gerd Möllmann <gerd@gnu.org>
Commit: Gerd Möllmann <gerd@gnu.org>

    Fix whitespace-tests on macOS
    
    * test/lisp/whitespace-tests.el (whitespace-tests--empty-bob):
    (whitespace-tests--empty-eob): Use C-a/C-e instead of
    <home>/<end> (bug#57763).
---
 test/lisp/whitespace-tests.el | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/test/lisp/whitespace-tests.el b/test/lisp/whitespace-tests.el
index 792e157ec0..97c30c4d62 100644
--- a/test/lisp/whitespace-tests.el
+++ b/test/lisp/whitespace-tests.el
@@ -149,7 +149,7 @@ buffer's content."
                                       "»\t\n"
                                       "\n"
                                       " x"))
-    (execute-kbd-macro (kbd "<up> <home>"))
+    (execute-kbd-macro (kbd "<up> C-a"))
     (should (equal (point) 1))
     (should (whitespace-tests--faceup " \n"
                                       "\t\n"
@@ -187,7 +187,7 @@ buffer's content."
                                       "» x"))
 
     ;; Inserting content on line 2 should un-highlight lines 2 and 3.
-    (execute-kbd-macro (kbd "<up> <up> <end>"))
+    (execute-kbd-macro (kbd "<up> <up> C-e"))
     (should (equal (line-number-at-pos) 2))
     (should (equal (- (point) (line-beginning-position)) 1))
     (execute-kbd-macro (kbd "y <down> <down>"))
@@ -199,7 +199,7 @@ buffer's content."
 
     ;; Removing the content on line 2 should re-highlight lines 2 and
     ;; 3.
-    (execute-kbd-macro (kbd "<up> <up> <end>"))
+    (execute-kbd-macro (kbd "<up> <up> C-e"))
     (should (equal (line-number-at-pos) 2))
     (should (equal (- (point) (line-beginning-position)) 2))
     (execute-kbd-macro (kbd "DEL <down> <down>"))
@@ -288,7 +288,7 @@ buffer's content."
                                       " »"))
 
     ;; Inserting content on line 3 should un-highlight lines 2 and 3.
-    (execute-kbd-macro (kbd "<down> <down> <home>"))
+    (execute-kbd-macro (kbd "<down> <down> C-a"))
     (should (equal (line-number-at-pos) 3))
     (should (equal (- (point) (line-beginning-position)) 0))
     (execute-kbd-macro (kbd "y <up> <up>"))
@@ -300,7 +300,7 @@ buffer's content."
 
     ;; Removing the content on line 3 should re-highlight lines 2 and
     ;; 3.
-    (execute-kbd-macro (kbd "<down> <down> <home>"))
+    (execute-kbd-macro (kbd "<down> <down> C-a"))
     (should (equal (line-number-at-pos) 3))
     (should (equal (- (point) (line-beginning-position)) 0))
     (execute-kbd-macro (kbd "<deletechar> <up> <up>"))