emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

emacs-27 e92b8e5: Remove raw carriage return characters from test file.


From: Philipp Stephani
Subject: emacs-27 e92b8e5: Remove raw carriage return characters from test file.
Date: Wed, 18 Mar 2020 07:40:10 -0400 (EDT)

branch: emacs-27
commit e92b8e535aa599fa4477578f3e5d0657e494fdd0
Author: Philipp Stephani <address@hidden>
Commit: Philipp Stephani <address@hidden>

    Remove raw carriage return characters from test file.
    
    This protects against tools that mangle newline characters in text
    files.
    
    * test/lisp/electric-tests.el (electric-pair-mode-newline-between-parens)
    (electric-layout-mode-newline-between-parens-without-e-p-m)
    (electric-layout-mode-newline-between-parens-without-e-p-m-2): Escape
    carriage return characters.
---
 test/lisp/electric-tests.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/test/lisp/electric-tests.el b/test/lisp/electric-tests.el
index 6334c62..56d1bdb 100644
--- a/test/lisp/electric-tests.el
+++ b/test/lisp/electric-tests.el
@@ -906,7 +906,7 @@ baz\"\""
     (electric-pair-local-mode 1)
     (insert-before-markers "int main () {}")
     (backward-char 1)
-    (let ((last-command-event ?
))
+    (let ((last-command-event ?\r))
       (call-interactively (key-binding `[,last-command-event])))
     (should (equal (buffer-string) "int main () {\n  \n}"))))
 
@@ -927,7 +927,7 @@ baz\"\""
                        '(after-stay))))))
     (insert "int main () {}")
     (backward-char 1)
-    (let ((last-command-event ?
))
+    (let ((last-command-event ?\r))
       (call-interactively (key-binding `[,last-command-event])))
     (should (equal (buffer-string) "int main () {\n  \n}"))))
 
@@ -948,7 +948,7 @@ baz\"\""
                        '(after-stay)))))
     (insert "int main () {}")
     (backward-char 1)
-    (let ((last-command-event ?
))
+    (let ((last-command-event ?\r))
       (call-interactively (key-binding `[,last-command-event])))
     (should (equal (buffer-string) "int main () {\n  \n}"))))
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]