github/melpa
1
0
Fork 0
mirror of https://github.com/correl/melpa.git synced 2024-11-14 19:19:32 +00:00
Code Issues Projects Releases Packages Wiki Activity

Dump error backtrace to stderr while ignoring errors.

Browse source
This commit is contained in:
Donald Curtis 2012-05-03 20:44:46 -05:00
parent 2f7bfdd9d0
commit e54824d6c3
1 changed files with 13 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
package-build.el
View file

@ -601,7 +601,19 @@ TARGET-SUBDIR is a directory relative to TARGET."
(defun package-build-archive-ignore-errors (pkg)
"Build archive for package PKG, ignoring any errors."
(interactive)
(ignore-errors (package-build-archive pkg)))
(let ((debug-on-error t)
(debug-on-signal t)
(pb/debugger-return nil)
(debugger (lambda (&rest args)
(setq pb/debugger-return (with-output-to-string
(backtrace))))))
(condition-case err
(package-build-archive pkg)
('error
(message "%s" (error-message-string err))
(message "%s" (mapconcat
'identity
(nthcdr 8 (split-string pb/debugger-return "\n")) "\n"))))))
(defun package-build-all ()
"Build all packages in the `package-build-alist'."