Search for json bytes fully
This commit is contained in:
parent
3449bdded6
commit
b04c59dfc7
1 changed files with 1 additions and 1 deletions
2
gudap.el
2
gudap.el
|
@ -271,7 +271,7 @@
|
||||||
(and (search-forward-regexp
|
(and (search-forward-regexp
|
||||||
"\\(?:.*: .*\r\n\\)*Content-Length: \
|
"\\(?:.*: .*\r\n\\)*Content-Length: \
|
||||||
*\\([[:digit:]]+\\)\r\n\\(?:.*: .*\r\n\\)*\r\n"
|
*\\([[:digit:]]+\\)\r\n\\(?:.*: .*\r\n\\)*\r\n"
|
||||||
(+ (point) 200)
|
nil
|
||||||
t)
|
t)
|
||||||
(string-to-number (match-string 1))))
|
(string-to-number (match-string 1))))
|
||||||
(unless expected-bytes
|
(unless expected-bytes
|
||||||
|
|
Loading…
Add table
Reference in a new issue