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:
parent
e9cf215d70
commit
f83d9e16d0
1 changed files with 7 additions and 6 deletions
|
|
@ -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
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue