From: Juanma Barranquero <lekktu@gmail.com>
Date: Mon, 3 May 2010 22:38:50 +0000 (+0200)
Subject: * mm-util.el (mm-decompress-buffer): Use `delete-file'.
X-Git-Tag: emacs-pretest-24.0.90~104^2~275^2~438^2~296
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=61a9da2586265ea8d7473d0fefbf008e2822f3c7;p=emacs.git

* mm-util.el (mm-decompress-buffer): Use `delete-file'.
---

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index fbf1302d4f7..bb6d11c81bd 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,8 @@
+2010-05-03  Juanma Barranquero  <lekktu@gmail.com>
+
+	* mm-util.el (mm-decompress-buffer): Use `delete-file';
+	alias `jka-compr-delete-temp-file' no longer exists.
+
 2010-05-03  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	Use define-minor-mode in Gnus where applicable.
diff --git a/lisp/gnus/mm-util.el b/lisp/gnus/mm-util.el
index 1e70a69b1fd..c1dc4f5b754 100644
--- a/lisp/gnus/mm-util.el
+++ b/lisp/gnus/mm-util.el
@@ -1563,7 +1563,7 @@ decompressed data.  The buffer's multibyteness must be turned off."
 	      (error
 	       (setq err-msg (error-message-string err)))))
 	  (when (file-exists-p err-file)
-	    (ignore-errors (jka-compr-delete-temp-file err-file)))
+	    (ignore-errors (delete-file err-file)))
 	  (when inplace
 	    (unless err-msg
 	      (delete-region (point-min) (point-max))