[elpa] externals/firefox-javascript-repl 76ba08cb86 19/24: Trim some messages

[Thomas Fitzsimmons]

branch: externals/firefox-javascript-repl
commit 76ba08cb867c801786b7e975dd4fa82e87be5bdb
Author: Thomas Fitzsimmons <fitzsim@fitzsim.org>
Commit: Thomas Fitzsimmons <fitzsim@fitzsim.org>

    Trim some messages
    
    * firefox-javascript-repl.el (fjrepl--debug): Trim message.
    (fjrepl--handle-first): Rename network argument.  Trim sentinel
    event messages.
    (firefox-javascript-repl): Rename firefox-process argument.  Trim
    sentinel event messages.
---
 firefox-javascript-repl.el | 14 ++++++++------
 1 file changed, 8 insertions(+), 6 deletions(-)

diff --git a/firefox-javascript-repl.el b/firefox-javascript-repl.el
index 71e0138c44..b4ac53effc 100644
--- a/firefox-javascript-repl.el
+++ b/firefox-javascript-repl.el
@@ -109,7 +109,7 @@
   (when fjrepl--debug
     (let ((messages-buffer-name "*fjrepl-debug*")
           (inhibit-message t))
-      (message "%s" message))))
+      (message "%s" (string-trim-left (string-trim-right message))))))
 
 (defun fjrepl--message (format &rest arguments)
   "Print to *Messages* a package herald and FORMAT.
@@ -419,9 +419,10 @@ the FRDP connection to Firefox."
                (when network
                  (set-process-sentinel
                   network
-                  (lambda (process event)
+                  (lambda (network event)
                     (fjrepl--message
-                     "Network sentinel: %S %S" process event)))))
+                     "Network sentinel: %S %S" network
+                     (string-trim-left (string-trim-right event)))))))
       (let ((nextp (and network
                         (fjrepl--get-result buffer t "applicationType"))))
         (when nextp
@@ -461,17 +462,18 @@ localhost (127.0.0.1) TCP port 6000."
                            "-profile" profile-directory
                            "-start-debugger-server")))
       (set-process-sentinel firefox-process
-                            (lambda (process event)
+                            (lambda (firefox-process event)
                               (fjrepl--message
                                "Firefox standard output sentinel: %S %S"
-                               process event)
+                               firefox-process
+                               (string-trim-left (string-trim-right event)))
                               (when (member
                                      event
                                      '("killed\n"
                                        "finished\n"))
                                 (fjrepl--message
                                  "%s %s; deleting %s"
-                                 process
+                                 firefox-process
                                  (string-trim-left (string-trim-right event))
                                  profile-directory)
                                 (setq fjrepl--console-actor nil)