@@ -272,7 +272,7 @@ This is used specifically to remove input used to trigger completion.
272
272
CALLBACK allows chaining an action after clearing."
273
273
(setq js-comint--discard-output (or callback 't ))
274
274
(comint-send-string
275
- (get-buffer-process ( current-buffer ) )
275
+ (js-comint-get-process )
276
276
" " ))
277
277
278
278
(defun js-comint--get-completion (input-string callback )
@@ -285,11 +285,11 @@ CALLBACK allows chaining an action after clearing."
285
285
; ; 1st tab usually does common prefix
286
286
(when (string-empty-p input-string)
287
287
(comint-send-string
288
- (get-buffer-process ( current-buffer ) )
288
+ (js-comint-get-process )
289
289
" \t " ))
290
290
291
291
(comint-send-string
292
- (get-buffer-process ( current-buffer ) )
292
+ (js-comint-get-process )
293
293
(format " %s \t " input-string)))
294
294
295
295
(defun js-comint--process-completion-output (completion prefix )
@@ -339,7 +339,7 @@ PREFIX is the original completion prefix string."
339
339
; ; Completions like Array. seem to need a second tab after the response
340
340
(if (string-suffix-p " ." js-comint--completion-prefix)
341
341
(comint-send-string
342
- (get-buffer-process ( current-buffer ) )
342
+ (js-comint-get-process )
343
343
" \t " )
344
344
; ; Otherwise there was no match, so reset
345
345
(setq js-comint--completion-prefix nil )
@@ -362,7 +362,7 @@ PREFIX is the original completion prefix string."
362
362
(defun js-comint--current-input ()
363
363
" Return current comint input relative to point.
364
364
Nil if point is before the current prompt."
365
- (let ((pmark (process-mark (get-buffer-process ( current-buffer ) ))))
365
+ (let ((pmark (process-mark (js-comint-get-process ))))
366
366
(when (>= (point ) (marker-position pmark))
367
367
(buffer-substring pmark (point )))))
368
368
0 commit comments