fileio-tests.el (test-non-regular-insert): Fix thinko

* test/src/fileio-tests.el (fileio-tests--non-regular-insert): Rename
from `test-non-regular-insert` and make it into a test rather than
a broken function.  Oh, and make it work while at it.

diff --git a/test/src/fileio-tests.el b/test/src/fileio-tests.el
index a9a43781d499187001de4c76dd1ff118f1df829b..29f11fc4725eda8993c13bc18d19c7fa2403d735 100644 (file)
--- a/test/src/fileio-tests.el
+++ b/test/src/fileio-tests.el
@@ -138,7 +138,7 @@ Also check that an encoding error can appear in a symlink."
     (should (and (file-name-absolute-p name)
                  (not (eq (aref name 0) ?~))))))
 
-(ert-deftest fileio-test--expand-file-name-null-bytes ()
+(ert-deftest fileio-tests--expand-file-name-null-bytes ()
   "Test that `expand-file-name' checks for null bytes in filenames."
   (should-error (expand-file-name (concat "file" (char-to-string ?\0) ".txt"))
                 :type 'wrong-type-argument)
@@ -193,11 +193,11 @@ Also check that an encoding error can appear in a symlink."
   (should (equal (file-name-concat "" "bar") "bar"))
   (should (equal (file-name-concat "" "") "")))
 
-(defun test-non-regular-insert ()
+(ert-deftest fileio-tests--non-regular-insert ()
   (skip-unless (file-exists-p "/dev/urandom"))
   (with-temp-buffer
     (should-error (insert-file-contents "/dev/urandom" nil 5 10))
     (insert-file-contents "/dev/urandom" nil nil 10)
-    (should (= (point-max) 10))))
+    (should (= (buffer-size) 10))))
 
 ;;; fileio-tests.el ends here