[Emacs-diffs] feature/gnus-select f8efd23 019/218: Add OpenDocument formats to Tramp file archives

[Andrew G Cohen]

branch: feature/gnus-select
commit f8efd236ff45b15a78b76e29e40e7f9b52162b92
Author: Michael Albinus <address@hidden>
Commit: Andrew G Cohen <address@hidden>

    Add OpenDocument formats to Tramp file archives
    
    * doc/misc/tramp.texi (Archive file names):
    * lisp/net/tramp-archive.el (tramp-archive-suffixes):
    Add OpenDocument formats.
---
 doc/misc/tramp.texi       | 16 ++++++++++++++++
 lisp/net/tramp-archive.el |  8 +++++---
 2 files changed, 21 insertions(+), 3 deletions(-)

diff --git a/doc/misc/tramp.texi b/doc/misc/tramp.texi
index e1c4f3e..3143904 100644
--- a/doc/misc/tramp.texi
+++ b/doc/misc/tramp.texi
@@ -3059,6 +3059,22 @@ BSD mtree format
 @cindex @file{mtree} file archive suffix
 @cindex file archive suffix @file{mtree}
 
address@hidden @samp{.odb}, @samp{.odf}, @samp{.odg}, @samp{.odp}, @samp{.ods},
address@hidden ---
+OpenDocument formats
address@hidden @file{odb} file archive suffix
address@hidden @file{odf} file archive suffix
address@hidden @file{odg} file archive suffix
address@hidden @file{odp} file archive suffix
address@hidden @file{ods} file archive suffix
address@hidden @file{odt} file archive suffix
address@hidden file archive suffix @file{odb}
address@hidden file archive suffix @file{odf}
address@hidden file archive suffix @file{odg}
address@hidden file archive suffix @file{odp}
address@hidden file archive suffix @file{ods}
address@hidden file archive suffix @file{odt}
+
 @item @samp{.pax} ---
 Posix archives
 @cindex @file{pax} file archive suffix
diff --git a/lisp/net/tramp-archive.el b/lisp/net/tramp-archive.el
index 87b6976..0b5a351 100644
--- a/lisp/net/tramp-archive.el
+++ b/lisp/net/tramp-archive.el
@@ -62,6 +62,7 @@
 ;; * ".lzh", ".LZH" - Microsoft Windows compressed LHA archives
 ;; * ".msu", ".MSU" - Microsoft Windows Update packages
 ;; * ".mtree" - BSD mtree format
+;; * ".odb" ".odf" ".odg" ".odp" ".ods" ".odt" - OpenDocument formats
 ;; * ".pax" - Posix archives
 ;; * ".rar" - RAR archives
 ;; * ".rpm" - Red Hat packages
@@ -126,9 +127,9 @@
 ;; <https://github.com/libarchive/libarchive/wiki/LibarchiveFormats>
 ;;;###autoload
 (defconst tramp-archive-suffixes
-  ;; "cab", "lzh" and "zip" are included with lower and upper letters,
-  ;; because Microsoft Windows provides them often with capital
-  ;; letters.
+  ;; "cab", "lzh", "msu" and "zip" are included with lower and upper
+  ;; letters, because Microsoft Windows provides them often with
+  ;; capital letters.
   '("7z" ;; 7-Zip archives.
     "apk" ;; Android package kits.  Not in libarchive testsuite.
     "ar" ;; UNIX archiver formats.
@@ -142,6 +143,7 @@
     "lzh" "LZH" ;; Microsoft Windows compressed LHA archives.
     "msu" "MSU" ;; Microsoft Windows Update packages.  Not in testsuite.
     "mtree" ;; BSD mtree format.
+    "odb" "odf" "odg" "odp" "ods" "odt" ;; OpenDocument formats.  Not in 
testsuite.
     "pax" ;; Posix archives.
     "rar" ;; RAR archives.
     "rpm" ;; Red Hat packages.