From: Karl Heuer <kwzh@gnu.org>
Date: Sat, 28 Aug 1999 15:16:55 +0000 (+0000)
Subject: (dired-guess-shell-alist-default): Support bzip2 format.
X-Git-Tag: emacs-pretest-21.0.90~7032
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7ba7b7947a7658e306fd52202d5371cca0f81866;p=emacs.git

(dired-guess-shell-alist-default): Support bzip2 format.
---

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")