]> code.delx.au - gnu-emacs/blobdiff - test/lisp/simple-tests.el
Simplify ‘delete-trailing-whitespace’ by not treating \n as whitespace
[gnu-emacs] / test / lisp / simple-tests.el
index 2722544446d1cfb755e7f6d2c2219d3fab732ed4..97b6c491629564ba57b9a7c7a35c34887315d256 100644 (file)
       (insert " \f \n \f \f \n\nlast\n")
       (delete-trailing-whitespace)
       (should (string-equal (buffer-string) " \f\n \f \f\n\nlast\n"))
-      (should (equal ?\s (char-syntax ?\f))))))
+      (should (equal ?\s (char-syntax ?\f)))
+      (should (equal ?\s (char-syntax ?\n))))))
 
 
 ;;; auto-boundary tests