Add test case for bug #1017553

diff --git a/Lib/test/test_tarfile.py b/Lib/test/test_tarfile.py
index 66156023f7448873441cc86fea0af6ce63490731..6b2fd6e808bf0af6eecfe52c7f2acca13298490a 100644 (file)
--- a/Lib/test/test_tarfile.py
+++ b/Lib/test/test_tarfile.py
@@ -327,6 +327,14 @@ class WriteTestGzip(WriteTest):
 class WriteStreamTestGzip(WriteStreamTest):
     comp = "gz"
 
+# Filemode test cases
+
+class FileModeTest(unittest.TestCase):
+    def test_modes(self):
+        self.assertEqual(tarfile.filemode(0755), '-rwxr-xr-x')
+        self.assertEqual(tarfile.filemode(07111), '---s--s--t')
+
+    
 if bz2:
     # Bzip2 TestCases
     class ReadTestBzip2(ReadTestGzip):
@@ -354,6 +362,7 @@ def test_main():
         bz2.BZ2File(tarname("bz2"), "wb").write(file(tarname(), "rb").read())
 
     tests = [
+        FileModeTest,
         ReadTest,
         ReadStreamTest,
         WriteTest,