1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

; * test/lisp/vc/log-edit-tests.el: Pacify compiler warnings.

This commit is contained in:
Po Lu 2024-01-29 11:01:33 +08:00
parent e9cf215d70
commit f83d9e16d0

View file

@ -189,7 +189,8 @@ lines."))))
;; This test verifies that filling the paragraph surrounding the
;; last line of defuns does not break between defun lists with
;; spaces in identifiers.
(setq string "
(let (string wanted)
(setq string "
* src/sfnt.c (xmalloc, xrealloc): Improve behavior upon allocation
failures during test.
(sfnt_table_names): Add prep.
@ -226,7 +227,7 @@ division.
(sfnt_interpret_idef, sfnt_interpret_if, sfnt_interpret_else)
(sfnt_round_none, sfnt_round_to_grid, sfnt_round_to_double_grid)
"
wanted "
wanted "
* src/sfnt.c
(xmalloc, xrealloc):
Improve behavior
@ -329,9 +330,9 @@ division.
(sfnt_round_to_grid)
(sfnt_round_to_double_grid):
")
(with-temp-buffer
(insert string)
(let ((fill-column 20)) (log-edit-fill-entry))
(should (equal (buffer-string) wanted))))
(with-temp-buffer
(insert string)
(let ((fill-column 20)) (log-edit-fill-entry))
(should (equal (buffer-string) wanted)))))
;;; log-edit-tests.el ends here