From ea0bb97f77cf7d6b1153732b27a1b5449af2a380 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Mon, 29 Jan 1996 23:18:20 +0000 Subject: [PATCH] (nntp-send-strings-to-server, nntp-async-send-strings): Fix error format string. --- lisp/nntp.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/nntp.el b/lisp/nntp.el index f3c0b7a0eb7..4577fe52585 100644 --- a/lisp/nntp.el +++ b/lisp/nntp.el @@ -1014,7 +1014,7 @@ It will prompt for a password." ;; We open the nntp server if it is down. (or (nntp-server-opened nntp-current-server) (nntp-open-server nntp-current-server) - (error (nntp-status-message))) + (error "%s" (nntp-status-message))) ;; Send the strings. (process-send-string nntp-server-process cmd))) @@ -1260,7 +1260,7 @@ defining this function as macro." (let ((cmd (concat (mapconcat 'identity strings " ") "\r\n"))) (or (nntp-async-server-opened) (nntp-async-open-server) - (error (nntp-status-message))) + (error "%s" (nntp-status-message))) (process-send-string nntp-async-process cmd))) (defun nntp-async-request-group (group) -- 2.39.2