(jka-compr-compression-info-list): Recognize backups of bz2 compressed files.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0f7b528ba3c1411d926c8a1d97c358995f5cc6c1..aa7f276852acbcceacab3075dbf3ef6582086ec6 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2007-02-17  Chris Moore <dooglus@gmail.com>
+
+       * jka-cmpr-hook.el (jka-compr-compression-info-list): Recognize
+       backups of bz2 compressed files.
+
 2007-02-17  Eli Zaretskii  <eliz@gnu.org>
 
        * info-look.el (info-lookup): Bind Info-fontify-maximum-menu-size

diff --git a/lisp/jka-cmpr-hook.el b/lisp/jka-cmpr-hook.el
index ce00181aaa3699fb24cd708e3217af7477354a89..b13ca7181ec3bbb65ee1700c60dd3184d19354d6 100644 (file)
--- a/lisp/jka-cmpr-hook.el
+++ b/lisp/jka-cmpr-hook.el
@@ -191,7 +191,7 @@ options through Custom does this automatically."
      ;; Formerly, these had an additional arg "-c", but that fails with
      ;; "Version 0.1pl2, 29-Aug-97." (RedHat 5.1 GNU/Linux) and
      ;; "Version 0.9.0b, 9-Sept-98".
-    ["\\.bz2\\'"
+    ["\\.bz2\\(~\\|\\.~[0-9]+~\\)?\\'"
      "bzip2ing"        "bzip2"         nil
      "bunzip2ing"      "bzip2"         ("-d")
      nil t "BZh"]