Function: jka-compr-get-compression-info
jka-compr-get-compression-info is a byte-compiled function defined in
jka-cmpr-hook.el.gz.
Signature
(jka-compr-get-compression-info FILENAME)
Documentation
Return information about the compression scheme of FILENAME.
The determination as to which compression scheme, if any, to use is
based on the filename itself and jka-compr-compression-info-list.
Source Code
;; Defined in /usr/src/emacs/lisp/jka-cmpr-hook.el.gz
(defun jka-compr-get-compression-info (filename)
"Return information about the compression scheme of FILENAME.
The determination as to which compression scheme, if any, to use is
based on the filename itself and `jka-compr-compression-info-list'."
(setq filename (file-name-sans-versions filename))
(catch 'compression-info
(let ((case-fold-search nil))
(dolist (x jka-compr-compression-info-list)
(and (string-match (jka-compr-info-regexp x) filename)
(throw 'compression-info x)))
nil)))