Commits

Anonymous committed b3a3193

Added James LewisMoss' patch from <hhr9jub47j.fsf@dres.lewismoss.org>
with subject "bzip support in crypt".

Comments (0)

Files changed (2)

+1999-09-20  James LewisMoss  <dres@ioa.com>
+
+	* crypt.el (crypt-build-encoding-alist): Add bzip2 data to
+	encoding list.
+	(crypt-find-file-hook): Add .bz2 as an ending to be stripped when
+	loading. 
+
 1999-11-08  Yoshiki Hayashi  <t90553@mail.ecc.u-tokyo.ac.jp>
 
 	* jka-compr.el (auto-compression-mode): Pass original
          "Zip"
          nil
          t)
+   ;; bzip2
+   (list 'bzip2
+         "BZh" nil
+         "\\(\\.bz2\\)$"
+         "bzip2" "bzip2"
+         "--quiet" "--decompress --quiet"
+         "Bzip2"
+         nil
+         t)
    ;; freeze
    (list 'freeze
          "\037\236\\|\037\237" nil
            (if (and (not (null buffer-file-name))
                     (string-match "\\.gz$" buffer-file-name))
                (set-visited-file-name
+                (substring buffer-file-name 0 (match-beginning 0))))
+           (if (and (not (null buffer-file-name))
+                    (string-match "\\.bz2$" buffer-file-name))
+               (set-visited-file-name
                 (substring buffer-file-name 0 (match-beginning 0)))))
            (message "Decoding %s..." (buffer-name))
            (crypt-encode-buffer t)