From 6843d5b8f50caa2c557e2098591a4199be5e392c Mon Sep 17 00:00:00 2001 From: Benjamin Buccianti Date: Wed, 29 Jul 2020 18:57:15 -0300 Subject: [PATCH] it's necessary to require subr-x! also use mapc instead of mapcar --- monroe.el | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/monroe.el b/monroe.el index 857773d..f3309bb 100644 --- a/monroe.el +++ b/monroe.el @@ -40,6 +40,7 @@ (require 'comint) (require 'cl-macs) +(require 'subr-x) (defgroup monroe nil "Interaction with the nREPL Server." @@ -319,10 +320,11 @@ monroe-repl-buffer." ;; ;; This 'ignore-errors' is a hard hack here since 'accept-process-output' will call filter ;; which will be this function causing Emacs to hit max stack size limit. - (when (eq ?e (aref string (- (length string) 1))) - (unless (accept-process-output process 0.01) - (while (> (buffer-size) 1) - (mapcar #'monroe-dispatch (monroe-net-decode))))))) + (ignore-errors + (when (eq ?e (aref string (- (length string) 1))) + (unless (accept-process-output process 0.01) + (while (> (buffer-size) 1) + (mapc #'monroe-dispatch (monroe-net-decode)))))))) (defun monroe-new-session-handler (process) "Returns callback that is called when new connection is established."