summaryrefslogtreecommitdiff
path: root/lisp/json.el
diff options
context:
space:
mode:
authorPhilipp Stephani <phst@google.com>2017-05-20 17:49:06 +0200
committerPhilipp Stephani <phst@google.com>2017-05-21 23:03:01 +0200
commit32f80eb678c4dc6335063cc39975bbce2766829a (patch)
tree2b50a491868c30fa73b1558212f12fd03a3e09ed /lisp/json.el
parent140aefc341da9cc865971d393071be029ff8b3c5 (diff)
downloademacs-32f80eb678c4dc6335063cc39975bbce2766829a.tar.gz
Fix definition of whitespace in JSON
See https://lists.gnu.org/archive/html/emacs-devel/2017-05/msg00115.html. * lisp/json.el (json-skip-whitespace): Fix definition. * test/lisp/json-tests.el (test-json-skip-whitespace): Adapt unit test.
Diffstat (limited to 'lisp/json.el')
-rw-r--r--lisp/json.el6
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/json.el b/lisp/json.el
index 5f403a411b7..3def94ce042 100644
--- a/lisp/json.el
+++ b/lisp/json.el
@@ -206,7 +206,11 @@ Unlike `reverse', this keeps the property-value pairs intact."
(defun json-skip-whitespace ()
"Skip past the whitespace at point."
- (skip-chars-forward "\t\r\n\f\b "))
+ ;; See
+ ;; https://www.ecma-international.org/publications/files/ECMA-ST/ECMA-404.pdf
+ ;; or https://tools.ietf.org/html/rfc7159#section-2 for the
+ ;; definition of whitespace in JSON.
+ (skip-chars-forward "\t\r\n "))