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

2 files changed, 6 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0f7b528ba3c..aa7f276852a 100644
--- 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 ce00181aaa3..b13ca7181ec 100644
--- 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"]