branch: master commit 9f361d8bf61afda19a0cadf790e06e29d6ba2d81 Author: Thomas Fitzsimmons <fitz...@fitzsim.org> Commit: Thomas Fitzsimmons <fitz...@fitzsim.org>
packages/excorporate: Update HTTP debugging steps * packages/excorporate/excorporate.texi (Troubleshooting): Update HTTP debugging instructions. * packages/excorporate/excorporate.info: Rebuild. --- packages/excorporate/excorporate.info | 35 +++++++++++++++++------------------ packages/excorporate/excorporate.texi | 30 +++++++++++++++--------------- 2 files changed, 32 insertions(+), 33 deletions(-) diff --git a/packages/excorporate/excorporate.info b/packages/excorporate/excorporate.info index f1acc6b..77fd4a5 100644 --- a/packages/excorporate/excorporate.info +++ b/packages/excorporate/excorporate.info @@ -177,23 +177,22 @@ message about having created a service. When this works, it will show a bunch of WSDL (XML) in *Messages*. -Debug the above URL retrievals with (setq url-debug t), and with this -patch: - - diff --git a/lisp/url/url-http.el b/lisp/url/url-http.el - index d49e527..0f1c8ae 100644 - --- a/lisp/url/url-http.el - +++ b/lisp/url/url-http.el - @ -869,6 +869,7 @ url-http-parse-headers - (url-handle-content-transfer-encoding)) - (url-http-debug "Finished parsing HTTP headers: %S" success) - (widen) - + (url-http-debug "Response: %s" (buffer-string)) - (goto-char (point-min)) - success)) - - -(Beware that HTTP responses are out-of-order with this patch.) +Debug the above URL retrievals with 'M-:' in an 'emacs -Q' run: + + (progn + (setq url-debug 1) + (url-retrieve-synchronously URL-STRING) + (dolist (p (seq-filter + (lambda (b) (string-match " *http*" (buffer-name b))) + (buffer-list))) + (message "HTTP result buffer: \"%s\"\n%s" + (buffer-name p) + (with-current-buffer p (buffer-string)))) + "check *Messages*") + +Beware that HTTP responses can be out-of-order, and that if you set +'url-debug' to a number or 't', Emacs may hang for a while if it +attempts to print a very large data structure. Once you're sure the above steps are working, try 'M-x excorporate'. @@ -232,6 +231,6 @@ Node: Installation2222 Node: Configuration2485 Node: Usage3505 Node: Troubleshooting4923 -Node: Reporting Bugs7758 +Node: Reporting Bugs7796 End Tag Table diff --git a/packages/excorporate/excorporate.texi b/packages/excorporate/excorporate.texi index 4235708..f3451b4 100644 --- a/packages/excorporate/excorporate.texi +++ b/packages/excorporate/excorporate.texi @@ -201,26 +201,26 @@ message about having created a service. When this works, it will show a bunch of WSDL (XML) in *Messages*. @noindent -Debug the above URL retrievals with (setq url-debug t), and with this -patch: +Debug the above URL retrievals with @code{M-:} in an @code{emacs -Q} +run: @example -diff --git a/lisp/url/url-http.el b/lisp/url/url-http.el -index d49e527..0f1c8ae 100644 ---- a/lisp/url/url-http.el -+++ b/lisp/url/url-http.el -@@ -869,6 +869,7 @@ url-http-parse-headers - (url-handle-content-transfer-encoding)) - (url-http-debug "Finished parsing HTTP headers: %S" success) - (widen) -+ (url-http-debug "Response: %s" (buffer-string)) - (goto-char (point-min)) - success)) - +(progn + (setq url-debug 1) + (url-retrieve-synchronously URL-STRING) + (dolist (p (seq-filter + (lambda (b) (string-match " *http*" (buffer-name b))) + (buffer-list))) + (message "HTTP result buffer: \"%s\"\n%s" + (buffer-name p) + (with-current-buffer p (buffer-string)))) + "check *Messages*") @end example @noindent -(Beware that HTTP responses are out-of-order with this patch.) +Beware that HTTP responses can be out-of-order, and that if you set +@code{url-debug} to a number or @code{t}, Emacs may hang for a while if +it attempts to print a very large data structure. @noindent Once you're sure the above steps are working, try @code{M-x