[Emacs-diffs] scratch/api.el d341ab3 2/4: * lisp/emacs-lisp/api.el: Style fixes

[Artur Malabarba]

branch: scratch/api.el
commit d341ab3e67c44e62e3d5648f6f7dee8a18b87672
Author: Artur Malabarba <address@hidden>
Commit: Artur Malabarba <address@hidden>

    * lisp/emacs-lisp/api.el: Style fixes
---
 lisp/emacs-lisp/api.el |    7 ++-----
 1 files changed, 2 insertions(+), 5 deletions(-)

diff --git a/lisp/emacs-lisp/api.el b/lisp/emacs-lisp/api.el
index ef13d37..592836d 100644
--- a/lisp/emacs-lisp/api.el
+++ b/lisp/emacs-lisp/api.el
@@ -45,7 +45,7 @@
   "Redirect received, but Location header not found! (see \"*Api Report*\" 
buffer)"
   'api-error)
 (define-error 'api-unintelligible-result
-  "Tried contacting server, but I can't understand the reply. See \"*Api 
Report*\" buffer"
+  "Tried contacting server, but I can't understand the reply.  See \"*Api 
Report*\" buffer"
   'api-error)
 (define-error 'api-bad-request
   "Server didn't understand my request, please you should probably file a bug 
report"
@@ -308,8 +308,7 @@ all of which inherit from `api-error'.
                       (_ nil))
                 (match-string-no-properties 1))))
          (goto-char (point-min))
-         (search-forward-regexp "^
?$")
-         (skip-chars-forward "[:blank:]\n\r")
+         (search-forward-regexp "^\r?$")
          (let* ((data (unless (eobp) (funcall reader))))
            (if (or (not next-page)
                    (< max-pages 2))
@@ -334,5 +333,3 @@ all of which inherit from `api-error'.
 
 (provide 'api)
 ;;; api.el ends here
-
-(function-put 'pcase 'edebug-form-spec nil)