no-nl-eof allows empty files

glasserc · Apr 26, 2010 · 075b2f5 · 075b2f5
1 parent c721332
commit 075b2f5
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 2 deletions.
diff --git a/lisp/ethan-wspace.el b/lisp/ethan-wspace.el
@@ -362,7 +362,8 @@ This internally uses `show-trailing-whitespace'."
 (defun ethan-wspace-type-no-nl-eof-find ()
   (let* ((trailing-newlines (ethan-wspace-count-trailing-nls))
          (max (point-max)))
-    (if (= trailing-newlines 0)
+    (if (and (= trailing-newlines 0)
+             (not (= (buffer-size) 0)))  ; don't count empty files as dirty
         (cons max max)
       nil)))
 
@@ -372,7 +373,8 @@ This internally uses `show-trailing-whitespace'."
     (save-excursion
       (goto-char (point-max))
       (skip-chars-backward "\n")
-      (if (not (looking-at "\n"))
+      (if (and (not (looking-at "\n"))
+               (not (= (buffer-size) 0)))   ; don't need to clean empty files
           (insert "\n")))))
 
 

diff --git a/tests/empty.txt b/tests/empty.txt