Rename condition-case-no-debug to condition-case-unless-debug
This commit is contained in:
parent
25dec36509
commit
1be3ca5ad7
11 changed files with 44 additions and 16 deletions
|
@ -1103,7 +1103,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-no-debug nil
|
||||
(condition-case-unless-debug nil
|
||||
(package--download-one-archive archive "archive-contents")
|
||||
(error (message "Failed to download `%s' archive."
|
||||
(car archive)))))
|
||||
|
@ -1608,7 +1608,7 @@ packages marked for deletion are removed."
|
|||
delete-list
|
||||
", "))))
|
||||
(dolist (elt delete-list)
|
||||
(condition-case-no-debug err
|
||||
(condition-case-unless-debug err
|
||||
(package-delete (car elt) (cdr elt))
|
||||
(error (message (cadr err)))))
|
||||
(error "Aborted")))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue