From 7ba7b7947a7658e306fd52202d5371cca0f81866 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Sat, 28 Aug 1999 15:16:55 +0000 Subject: [PATCH] (dired-guess-shell-alist-default): Support bzip2 format. --- lisp/dired-x.el | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/lisp/dired-x.el b/lisp/dired-x.el index f6497761b50..91d36034ee5 100644 --- a/lisp/dired-x.el +++ b/lisp/dired-x.el @@ -957,6 +957,11 @@ dired." (concat "gunzip -qc * | tar xvf -")) ;; Optional decompression. '(concat "gunzip" (if dired-guess-shell-gzip-quiet " -q" ""))) + ;; bzip2'ed archives + (list "\\.tar\\.bz2$" + "bunzip2 -c * | tar xvf -" + ;; Optional decompression. + "bunzip2") '("\\.shar.Z$" "zcat * | unshar") '("\\.shar.g?z$" "gunzip -qc * | unshar") @@ -1003,6 +1008,7 @@ dired." ;; Compression. (list "\\.g?z$" '(concat "gunzip" (if dired-guess-shell-gzip-quiet " -q"))) + (list "\\.bz2$" "bunzip2") (list "\\.Z$" "uncompress" ;; Optional conversion to gzip format. '(concat "znew" (if dired-guess-shell-gzip-quiet " -q") -- 2.39.5