procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Add more xz compression support.

Browse source 
* 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.
This commit is contained in:
Ulrich Mueller 2010-09-25 14:42:48 -07:00 • committed by Glenn Morris
parent cbdd0d5877
commit 4c96435152
14 changed files with 47 additions and 12 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
doc/man/ChangeLog
View file

@ -1,3 +1,7 @@
2010-09-25 Ulrich Mueller <ulm@gentoo.org>
* etags.1: xz compression is now supported.
2010-08-26 Sven Joachim <svenjoac@gmx.de>
* emacs.1: Mention "maximized" value for the "fullscreen" X resource.

2
doc/man/etags.1
View file

@ -62,7 +62,7 @@ Files specified with absolute file names will be recorded
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

4
doc/misc/ChangeLog
View file

@ -1,3 +1,7 @@
2010-09-25 Ulrich Mueller <ulm@gentoo.org>
* woman.texi (Interface Options): xz compression is now supported.
2010-09-24 Glenn Morris <rgm@gnu.org>
* url.texi (Disk Caching): Tweak previous change.

4
doc/misc/woman.texi
View file

@ -1121,8 +1121,8 @@ A regular match expression used to match compressed man file extensions
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
@code{"\\.\\(g?z\\|bz2\\)\\'"}, which matches the @code{gzip} and
@code{bzip2} compression extensions.
@code{"\\.\\(g?z\\|bz2\\|xz\\)\\'"}, which matches the @code{gzip},
@code{bzip2}, and @code{xz} compression extensions.
@emph{Do not change this unless you are sure you know what you are doing!}

4
lib-src/ChangeLog
View file

@ -1,3 +1,7 @@
2010-09-25 Ulrich Mueller <ulm@gentoo.org>
* etags.c (compressors, print_language_names): Support xz compression.
2010-08-11 Jan Djärv <jan.h.d@swipnet.se>
* fakemail.c: Include stdlib.h for getenv. Remove declaration of

3
lib-src/etags.c
View file

@ -561,6 +561,7 @@ static compressor compressors[] =
{ "gz", "gzip -d -c"},
{ "GZ", "gzip -d -c"},
{ "bz2", "bzip2 -d -c" },
{ "xz", "xz -d -c" },
{ NULL }
};
@ -874,7 +875,7 @@ followed by the name of an interpreter. If no such sequence is found,\n\
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.");

11
lisp/ChangeLog
View file

@ -1,3 +1,14 @@
2010-09-25 Ulrich Mueller <ulm@gentoo.org>
* 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 <cyd@stupidchicken.com>
* files.el (get-free-disk-space): Don't assume the "df" output

3
lisp/eshell/em-ls.el
View file

@ -162,10 +162,11 @@ faster and conserves more memory."
(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)

3
lisp/eshell/esh-util.el
View file

@ -71,8 +71,9 @@ Setting this to nil is offered as an aid to debugging only."
: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)

3
lisp/ibuffer.el
View file

@ -332,8 +332,9 @@ directory, like `default-directory'."
: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)

4
lisp/info.el
View file

@ -402,24 +402,28 @@ or `Info-virtual-nodes'."
(".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

3
lisp/international/mule.el
View file

@ -1679,7 +1679,7 @@ ARC\\|ZIP\\|LZH\\|LHA\\|ZOO\\|[JEW]AR\\|XPI\\|RAR\\|7Z\\)\\'"
. 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 @@ A file whose name matches REGEXP is decoded by CODING-SYSTEM on reading.
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")

4
lisp/progmodes/etags.el
View file

@ -68,12 +68,14 @@ Use the `etags' program to make a tags table file."
: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)

7
lisp/woman.el
View file

@ -810,7 +810,7 @@ without interactive confirmation, if it exists as a topic."
(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 @@ MUST NOT end with any kind of string terminator such as $ or \\'."
: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)