summaryrefslogtreecommitdiff
path: root/test/lisp/arc-mode-tests.el
diff options
context:
space:
mode:
authorTino Calancha <tino.calancha@gmail.com>2017-08-15 15:43:16 +0900
committerTino Calancha <tino.calancha@gmail.com>2017-08-15 15:43:31 +0900
commit66b75d3f2002459edccd241af57c63b380b192d3 (patch)
tree5f11c7be13334e555cc255d2d333616b44d47fb3 /test/lisp/arc-mode-tests.el
parent97460582e2d0052f27d342ddb90309dc3da700b8 (diff)
downloademacs-66b75d3f2002459edccd241af57c63b380b192d3.tar.gz
archive-int-to-mode: Fix order of testing S_ISUID, S_ISGID bits
* lisp/arc-mode.el (archive-int-to-mode): Swap order of 2048 and 1024 tests (Bug#28092). * test/lisp/arc-mode-tests.el (arc-mode-test-archive-int-to-mode): Update test.
Diffstat (limited to 'test/lisp/arc-mode-tests.el')
-rw-r--r--test/lisp/arc-mode-tests.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/test/lisp/arc-mode-tests.el b/test/lisp/arc-mode-tests.el
index 04047bab62d..8c8465d3669 100644
--- a/test/lisp/arc-mode-tests.el
+++ b/test/lisp/arc-mode-tests.el
@@ -27,7 +27,8 @@
(cons 420 "-rw-r--r--")
(cons 292 "-r--r--r--")
(cons 512 "----------")
- (cons 1024 "---S------"))))
+ (cons 1024 "------S---") ; Bug#28092
+ (cons 2048 "---S------"))))
(dolist (x alist)
(should (equal (cdr x) (archive-int-to-mode (car x)))))))