# HG changeset patch # User martinb # Date 950256974 0 # Fri Feb 11 08:16:14 2000 +0000 # Node ID d75e73eb673b1348dfdef49f81c00a1900c674c1 # Parent 46f8accfa8caca5c8fb71a7110d91dd64f713752 crypt.el vs. pre-0.9.5 bzip2 diff --git a/ChangeLog b/ChangeLog --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,9 @@ +2000-02-09 Martin Buchholz <martin@xemacs.org> + + * crypt.el (crypt-build-encoding-alist): Remove bzip2 `--quiet' + option, not available before bzip2 0.9.5. + Fix two byte-compiler warnings. + 1999-09-20 James LewisMoss <dres@ioa.com> * crypt.el (crypt-build-encoding-alist): Add bzip2 data to diff --git a/crypt.el b/crypt.el --- a/crypt.el +++ b/crypt.el @@ -1039,7 +1039,7 @@ "BZh" nil "\\(\\.bz2\\)$" "bzip2" "bzip2" - "--quiet" "--decompress --quiet" + "" "--decompress" "Bzip2" nil t) @@ -2413,7 +2413,7 @@ ;; Take care when appending to write-file-hook. User's version of add-hook ;; may not have APPEND option. If it fails then do it by hand. I wish ;; everyone would upgrade - lrd 8/31/93. -(condition-case err +(condition-case nil (add-hook 'write-file-hooks 'crypt-write-file-hook t) ; *must* append this (error ;; Do it by hand. Not as robust as `add-hook'. @@ -2618,7 +2618,7 @@ (interactive) ;; In case we can't find reporter... - (condition-case err + (condition-case nil (progn ;; Get it if we can. (require 'reporter)