Rename empc-response-message' as empc-echo-response' and trim the trailing `\n'

This commit is contained in:
Renaud Casenave-Péré 2011-06-29 15:40:16 +09:00
parent 3bc81272e2
commit 6edac266cf

View file

@ -68,10 +68,12 @@ return at the end of a request.")
(when empc-verbose
(message "empc: connection closed"))))))
(defun empc-response-message (closure msg)
"Print the response into the minibuffer if EMPC-VERBOSE is not-nil."
(defun empc-echo-response (msg)
"Print the response into the minibuffer if EMPC-VERBOSE is non nil."
(when empc-verbose
(message "empc: %s" msg)))
(message "empc: %s" (if (string= (substring msg -1) "\n")
(substring msg 0 -1)
msg))))
(defun empc-response-parse-line (line)
"Turn the given line into a cons cell.