File tree 1 file changed +8
-4
lines changed
1 file changed +8
-4
lines changed Original file line number Diff line number Diff line change @@ -158,15 +158,19 @@ The message is formed by calling `format' with STRING and ARGS."
158
158
; ;; Communication protocol
159
159
160
160
(defalias 'drepl--json-decode
161
- (if (json-available-p)
161
+ (if (fboundp ' json-available-p )
162
162
(lambda (s )
163
163
(json-parse-string s :object-type 'alist :null-object nil ))
164
- (error " Not implemented " )))
164
+ (require 'json )
165
+ (declare-function json-read-from-string " json" ())
166
+ #'json-read-from-string ))
165
167
166
168
(defalias 'drepl--json-encode
167
- (if (json-available-p )
169
+ (if (fboundp ' json-serialize )
168
170
(lambda (s ) (json-serialize s :null-object nil ))
169
- (error " Not implemented " )))
171
+ (require 'json )
172
+ (declare-function json-encode " json" ())
173
+ #'json-encode ))
170
174
171
175
(cl-defgeneric drepl--send-request (repl data)
172
176
" Send request data to REPL.
You can’t perform that action at this time.
0 commit comments