]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix selinux test in files-tests.el
authorMichael Albinus <michael.albinus@gmx.de>
Tue, 5 Jun 2018 07:43:34 +0000 (09:43 +0200)
committerMichael Albinus <michael.albinus@gmx.de>
Tue, 5 Jun 2018 07:43:34 +0000 (09:43 +0200)
* test/lisp/files-tests.el
(files-tests-file-name-non-special-set-file-selinux-context):
Adapt test.

test/lisp/files-tests.el

index 30a09c796e8bf9a2899dc8437bddb8a0e13de2d1..3b192ee8727deeb555539cc52954cbe4d67c9cbd 100644 (file)
@@ -998,7 +998,8 @@ unquoted file names."
       (set-file-selinux-context nospecial (file-selinux-context nospecial))))
   (files-tests--with-temp-non-special-and-file-name-handler (tmpfile nospecial)
     (unless (equal (file-selinux-context tmpfile) '(nil nil nil nil))
-      (set-file-selinux-context nospecial (file-selinux-context nospecial)))))
+      (should-error
+       (set-file-selinux-context nospecial (file-selinux-context nospecial))))))
 
 (ert-deftest files-tests-file-name-non-special-set-file-times ()
   (files-tests--with-temp-non-special (tmpfile nospecial)