[Emacs-diffs] /srv/bzr/emacs/trunk r101620: Add more xz compression support.

[Glenn Morris]

------------------------------------------------------------
revno: 101620
author: Ulrich Mueller <address@hidden>
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Sat 2010-09-25 14:42:48 -0700
message:
  Add more xz compression support.
  
  * doc/man/etags.1: xz compression is now supported.
  * doc/misc/woman.texi (Interface Options): xz compression is now supported.
  
  * lib-src/etags.c (compressors, print_language_names): Support xz compression.
  
  * lisp/eshell/em-ls.el (eshell-ls-archive-regexp):
  * lisp/eshell/esh-util.el (eshell-tar-regexp):
  * lisp/ibuffer.el (ibuffer-compressed-file-name-regexp):
  * lisp/info.el (Info-suffix-list):
  * lisp/international/mule.el (auto-coding-alist):
  * lisp/woman.el (woman-file-regexp, woman-file-compression-regexp):
  * lisp/progmodes/etags.el (tags-compression-info-list):
  Support xz compression.
modified:
  doc/man/ChangeLog
  doc/man/etags.1
  doc/misc/ChangeLog
  doc/misc/woman.texi
  lib-src/ChangeLog
  lib-src/etags.c
  lisp/ChangeLog
  lisp/eshell/em-ls.el
  lisp/eshell/esh-util.el
  lisp/ibuffer.el
  lisp/info.el
  lisp/international/mule.el
  lisp/progmodes/etags.el
  lisp/woman.el

=== modified file 'doc/man/ChangeLog'
--- a/doc/man/ChangeLog 2010-09-01 07:13:21 +0000
+++ b/doc/man/ChangeLog 2010-09-25 21:42:48 +0000
@@ -1,3 +1,7 @@
+2010-09-25  Ulrich Mueller  <address@hidden>
+
+       * etags.1: xz compression is now supported.
+
 2010-08-26  Sven Joachim  <address@hidden>
 
        * emacs.1: Mention "maximized" value for the "fullscreen" X resource.

=== modified file 'doc/man/etags.1'
--- a/doc/man/etags.1   2010-01-13 08:35:10 +0000
+++ b/doc/man/etags.1   2010-09-25 21:42:48 +0000
@@ -62,7 +62,7 @@
 with absolute file names.  Files generated from a source file\-\-like
 a C file generated from a source Cweb file\-\-will be recorded with
 the name of the source file.
-Compressed files are supported using gzip and bzip2.
+Compressed files are supported using gzip, bzip2, and xz.
 The programs recognize the language used in an input file based on its
 file name and contents.  The \fB\-\-language\fP switch can be used to force
 parsing of the file names following the switch according to the given

=== modified file 'doc/misc/ChangeLog'
--- a/doc/misc/ChangeLog        2010-09-24 02:38:11 +0000
+++ b/doc/misc/ChangeLog        2010-09-25 21:42:48 +0000
@@ -1,3 +1,7 @@
+2010-09-25  Ulrich Mueller  <address@hidden>
+
+       * woman.texi (Interface Options): xz compression is now supported.
+
 2010-09-24  Glenn Morris  <address@hidden>
 
        * url.texi (Disk Caching): Tweak previous change.

=== modified file 'doc/misc/woman.texi'
--- a/doc/misc/woman.texi       2010-06-24 07:10:51 +0000
+++ b/doc/misc/woman.texi       2010-09-25 21:42:48 +0000
@@ -1121,8 +1121,8 @@
 for which decompressors are available and handled by auto-compression
 mode.  It should begin with @code{\\.} and end with @code{\\'} and
 @emph{must not} be optional.  The default value is
address@hidden"\\.\\(g?z\\|bz2\\)\\'"}, which matches the @code{gzip} and
address@hidden compression extensions.
address@hidden"\\.\\(g?z\\|bz2\\|xz\\)\\'"}, which matches the @code{gzip},
address@hidden, and @code{xz} compression extensions.
 
 @emph{Do not change this unless you are sure you know what you are doing!}
 

=== modified file 'lib-src/ChangeLog'
--- a/lib-src/ChangeLog 2010-08-11 09:16:35 +0000
+++ b/lib-src/ChangeLog 2010-09-25 21:42:48 +0000
@@ -1,3 +1,7 @@
+2010-09-25  Ulrich Mueller  <address@hidden>
+
+       * etags.c (compressors, print_language_names): Support xz compression.
+
 2010-08-11  Jan Djärv  <address@hidden>
 
        * fakemail.c: Include stdlib.h for getenv. Remove declaration of

=== modified file 'lib-src/etags.c'
--- a/lib-src/etags.c   2010-08-11 08:20:34 +0000
+++ b/lib-src/etags.c   2010-09-25 21:42:48 +0000
@@ -561,6 +561,7 @@
   { "gz", "gzip -d -c"},
   { "GZ", "gzip -d -c"},
   { "bz2", "bzip2 -d -c" },
+  { "xz", "xz -d -c" },
   { NULL }
 };
 
@@ -874,7 +875,7 @@
 Fortran is tried first; if no tags are found, C is tried next.\n\
 When parsing any C file, a \"class\" or \"template\" keyword\n\
 switches to C++.");
-  puts ("Compressed files are supported using gzip and bzip2.\n\
+  puts ("Compressed files are supported using gzip, bzip2, and xz.\n\
 \n\
 For detailed help on a given language use, for example,\n\
 etags --help --lang=ada.");

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2010-09-25 20:16:35 +0000
+++ b/lisp/ChangeLog    2010-09-25 21:42:48 +0000
@@ -1,3 +1,14 @@
+2010-09-25  Ulrich Mueller  <address@hidden>
+
+       * eshell/em-ls.el (eshell-ls-archive-regexp):
+       * eshell/esh-util.el (eshell-tar-regexp):
+       * ibuffer.el (ibuffer-compressed-file-name-regexp):
+       * info.el (Info-suffix-list):
+       * international/mule.el (auto-coding-alist):
+       * woman.el (woman-file-regexp, woman-file-compression-regexp):
+       * progmodes/etags.el (tags-compression-info-list):
+       Support xz compression.
+
 2010-09-25  Chong Yidong  <address@hidden>
 
        * files.el (get-free-disk-space): Don't assume the "df" output

=== modified file 'lisp/eshell/em-ls.el'
--- a/lisp/eshell/em-ls.el      2010-02-09 01:58:57 +0000
+++ b/lisp/eshell/em-ls.el      2010-09-25 21:42:48 +0000
@@ -162,10 +162,11 @@
 
 (defcustom eshell-ls-archive-regexp
   (concat "\\.\\(t\\(a[rz]\\|gz\\)\\|arj\\|lzh\\|"
-         "zip\\|[zZ]\\|gz\\|bz2\\|deb\\|rpm\\)\\'")
+         "zip\\|[zZ]\\|gz\\|bz2\\|xz\\|deb\\|rpm\\)\\'")
   "*A regular expression that matches names of file archives.
 This typically includes both traditional archives and compressed
 files."
+  :version "24.1"                      ; added xz
   :type 'regexp
   :group 'eshell-ls)
 

=== modified file 'lisp/eshell/esh-util.el'
--- a/lisp/eshell/esh-util.el   2010-02-07 06:23:10 +0000
+++ b/lisp/eshell/esh-util.el   2010-09-25 21:42:48 +0000
@@ -71,8 +71,9 @@
   :group 'eshell-util)
 
 (defcustom eshell-tar-regexp
-  "\\.t\\(ar\\(\\.\\(gz\\|bz2\\|Z\\)\\)?\\|gz\\|a[zZ]\\|z2\\)\\'"
+  "\\.t\\(ar\\(\\.\\(gz\\|bz2\\|xz\\|Z\\)\\)?\\|gz\\|a[zZ]\\|z2\\)\\'"
   "*Regular expression used to match tar file names."
+  :version "24.1"                      ; added xz
   :type 'regexp
   :group 'eshell-util)
 

=== modified file 'lisp/ibuffer.el'
--- a/lisp/ibuffer.el   2010-08-29 22:15:09 +0000
+++ b/lisp/ibuffer.el   2010-09-25 21:42:48 +0000
@@ -332,8 +332,9 @@
   :group 'ibuffer)
 
 (defcustom ibuffer-compressed-file-name-regexp
-  "\\.\\(arj\\|bgz\\|bz2\\|gz\\|lzh\\|taz\\|tgz\\|zip\\|z\\)$"
+  "\\.\\(arj\\|bgz\\|bz2\\|gz\\|lzh\\|taz\\|tgz\\|xz\\|zip\\|z\\)$"
   "Regexp to match compressed file names."
+  :version "24.1"                       ; added xz
   :type 'regexp
   :group 'ibuffer)
 

=== modified file 'lisp/info.el'
--- a/lisp/info.el      2010-08-29 22:15:09 +0000
+++ b/lisp/info.el      2010-09-25 21:42:48 +0000
@@ -402,24 +402,28 @@
        (".info.gz".   "gunzip")
        (".info.z".    "gunzip")
        (".info.bz2" . ("bzip2" "-dc"))
+       (".info.xz".   "unxz")
        (".info".      nil)
        ("-info.Z".   "uncompress")
        ("-info.Y".   "unyabba")
        ("-info.gz".  "gunzip")
        ("-info.bz2" . ("bzip2" "-dc"))
        ("-info.z".   "gunzip")
+       ("-info.xz".  "unxz")
        ("-info".     nil)
        ("/index.Z".   "uncompress")
        ("/index.Y".   "unyabba")
        ("/index.gz".  "gunzip")
        ("/index.z".   "gunzip")
        ("/index.bz2". ("bzip2" "-dc"))
+       ("/index.xz".  "unxz")
        ("/index".     nil)
        (".Z".         "uncompress")
        (".Y".         "unyabba")
        (".gz".        "gunzip")
        (".z".         "gunzip")
        (".bz2" .      ("bzip2" "-dc"))
+       (".xz".        "unxz")
        ("".           nil)))
   "List of file name suffixes and associated decoding commands.
 Each entry should be (SUFFIX . STRING); the file is given to

=== modified file 'lisp/international/mule.el'
--- a/lisp/international/mule.el        2010-08-30 13:03:05 +0000
+++ b/lisp/international/mule.el        2010-09-25 21:42:48 +0000
@@ -1679,7 +1679,7 @@
      . no-conversion-multibyte)
     ("\\.\\(exe\\|EXE\\)\\'" . no-conversion)
     ("\\.\\(sx[dmicw]\\|odt\\|tar\\|tgz\\)\\'" . no-conversion)
-    ("\\.\\(gz\\|Z\\|bz\\|bz2\\|gpg\\)\\'" . no-conversion)
+    ("\\.\\(gz\\|Z\\|bz\\|bz2\\|xz\\|gpg\\)\\'" . no-conversion)
     ("\\.\\(jpe?g\\|png\\|gif\\|tiff?\\|p[bpgn]m\\)\\'" . no-conversion)
     ("\\.pdf\\'" . no-conversion)
     ("/#[^/]+#\\'" . emacs-mule)))
@@ -1690,6 +1690,7 @@
 The settings in this alist take priority over `coding:' tags
 in the file (see the function `set-auto-coding')
 and the contents of `file-coding-system-alist'."
+  :version "24.1"                       ; added xz
   :group 'files
   :group 'mule
   :type '(repeat (cons (regexp :tag "File name regexp")

=== modified file 'lisp/progmodes/etags.el'
--- a/lisp/progmodes/etags.el   2010-09-25 12:04:35 +0000
+++ b/lisp/progmodes/etags.el   2010-09-25 21:42:48 +0000
@@ -68,12 +68,14 @@
   :type '(repeat file))
 
 ;;;###autoload
-(defcustom tags-compression-info-list (purecopy '("" ".Z" ".bz2" ".gz" ".tgz"))
+(defcustom tags-compression-info-list
+  (purecopy '("" ".Z" ".bz2" ".gz" ".xz" ".tgz"))
   "*List of extensions tried by etags when jka-compr is used.
 An empty string means search the non-compressed file.
 These extensions will be tried only if jka-compr was activated
 \(i.e. via customize of `auto-compression-mode' or by calling the function
 `auto-compression-mode')."
+  :version "24.1"                      ; added xz
   :type  '(repeat string)
   :group 'etags)
 

=== modified file 'lisp/woman.el'
--- a/lisp/woman.el     2010-08-29 16:17:13 +0000
+++ b/lisp/woman.el     2010-09-25 21:42:48 +0000
@@ -810,7 +810,7 @@
 
 (defvar woman-file-regexp nil
   "Regexp used to select (possibly compressed) man source files, e.g.
-\"\\.\\([0-9lmnt]\\w*\\)\\(\\.\\(g?z\\|bz2\\)\\)?\\'\".
+\"\\.\\([0-9lmnt]\\w*\\)\\(\\.\\(g?z\\|bz2\\|xz\\)\\)?\\'\".
 Built automatically from the customizable user options
 `woman-uncompressed-file-regexp' and `woman-file-compression-regexp'.")
 
@@ -846,16 +846,17 @@
   :group 'woman-interface)
 
 (defcustom woman-file-compression-regexp
-  "\\.\\(g?z\\|bz2\\)\\'"
+  "\\.\\(g?z\\|bz2\\|xz\\)\\'"
   "Do not change this unless you are sure you know what you are doing!
 Regexp used to match compressed man file extensions for which
 decompressors are available and handled by auto-compression mode,
-e.g. \"\\\\.\\\\(g?z\\\\|bz2\\\\)\\\\'\" for `gzip' or `bzip2'.
+e.g. \"\\\\.\\\\(g?z\\\\|bz2\\\\|xz\\\\)\\\\'\" for `gzip', `bzip2', or `xz'.
 Should begin with \\. and end with \\' and MUST NOT be optional."
   ;; Should be compatible with car of
   ;; `jka-compr-file-name-handler-entry', but that is unduly
   ;; complicated, includes an inappropriate extension (.tgz) and is
   ;; not loaded by default!
+  :version "24.1"                       ; added xz
   :type 'regexp
   :set 'set-woman-file-regexp
   :group 'woman-interface)