Commit 515de2e3 authored by Chong Yidong's avatar Chong Yidong
Browse files

Use condition-case-no-debug in package.el.

* lisp/emacs-lisp/package.el (package-refresh-contents)
(package-menu-execute): Use condition-case-no-debug.
parent a5057546
2011-03-08 Chong Yidong <>
* emacs-lisp/package.el (package-refresh-contents)
(package-menu-execute): Use condition-case-no-debug.
2011-03-08 Michael Albinus <>
* simple.el (shell-command-to-string): Use `process-file'.
......@@ -1040,7 +1040,7 @@ makes them available for download."
(unless (file-exists-p package-user-dir)
(make-directory package-user-dir t))
(dolist (archive package-archives)
(condition-case nil
(condition-case-no-debug nil
(package--download-one-archive archive "archive-contents")
(error (message "Failed to download `%s' archive."
(car archive)))))
......@@ -1468,7 +1468,7 @@ packages marked for deletion are removed."
", "))))
(dolist (elt delete-list)
(condition-case err
(condition-case-no-debug err
(package-delete (car elt) (cdr elt))
(error (message (cadr err)))))
(error "Aborted")))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment