summaryrefslogtreecommitdiff
path: root/test/lisp/vc/log-edit-tests.el
diff options
context:
space:
mode:
authorPaul Eggert <eggert@cs.ucla.edu>2019-12-10 20:04:36 -0800
committerPaul Eggert <eggert@cs.ucla.edu>2019-12-10 20:05:49 -0800
commitb0f20651e3cbb8a66f11ffae4c18634019c20cd4 (patch)
tree067bcb8fa529b4afee6d189f409faf16bd437810 /test/lisp/vc/log-edit-tests.el
parent0940296ebe56ebdf9c32e94191d4f0b18006a910 (diff)
downloademacs-b0f20651e3cbb8a66f11ffae4c18634019c20cd4.tar.gz
emacs-b0f20651e3cbb8a66f11ffae4c18634019c20cd4.tar.bz2
emacs-b0f20651e3cbb8a66f11ffae4c18634019c20cd4.zip
; Spelling fixes
Diffstat (limited to 'test/lisp/vc/log-edit-tests.el')
-rw-r--r--test/lisp/vc/log-edit-tests.el21
1 files changed, 10 insertions, 11 deletions
diff --git a/test/lisp/vc/log-edit-tests.el b/test/lisp/vc/log-edit-tests.el
index 7d77eca87d2..72d5488ec2e 100644
--- a/test/lisp/vc/log-edit-tests.el
+++ b/test/lisp/vc/log-edit-tests.el
@@ -37,7 +37,7 @@
\(fun6):
\(fun7): Some prose.
\(fun8): A longer description of a complicated change.\
- Spread over a couple of sentencences.\
+ Spread over a couple of sentences.\
Long enough to be filled for several lines.
\(fun9): Etc.")
(goto-char (point-min))
@@ -46,7 +46,7 @@
* dir/file.ext (fun1, fun2, fun3):
* file2.txt (fun4, fun5, fun6, fun7): Some prose.
\(fun8): A longer description of a complicated change. Spread over a
-couple of sentencences. Long enough to be filled for several lines.
+couple of sentences. Long enough to be filled for several lines.
\(fun9): Etc."))
(let ((fill-column 20)) (log-edit-fill-entry))
(should (equal (buffer-string) "\
@@ -59,10 +59,9 @@ Some prose.
description of a
complicated change.
Spread over a couple
-of sentencences.
-Long enough to be
-filled for several
-lines.
+of sentences. Long
+enough to be filled
+for several lines.
\(fun9): Etc."))
(let ((fill-column 40)) (log-edit-fill-entry))
(should (equal (buffer-string) "\
@@ -71,21 +70,21 @@ lines.
Some prose.
\(fun8): A longer description of a
complicated change. Spread over a
-couple of sentencences. Long enough to
-be filled for several lines.
+couple of sentences. Long enough to be
+filled for several lines.
\(fun9): Etc."))))
(ert-deftest log-edit-fill-entry-trailing-prose ()
(with-temp-buffer
(insert "\
* dir/file.ext (fun1): A longer description of a complicated change.\
- Spread over a couple of sentencences.\
+ Spread over a couple of sentences.\
Long enough to be filled for several lines.")
(let ((fill-column 72)) (log-edit-fill-entry))
(should (equal (buffer-string) "\
* dir/file.ext (fun1): A longer description of a complicated change.
-Spread over a couple of sentencences. Long enough to be filled for
-several lines."))))
+Spread over a couple of sentences. Long enough to be filled for several
+lines."))))
(ert-deftest log-edit-fill-entry-joining ()
;; Join short enough function names on the same line.