diff options
Diffstat (limited to 'lisp/net')
| -rw-r--r-- | lisp/net/newst-backend.el | 2 | ||||
| -rw-r--r-- | lisp/net/soap-inspect.el | 2 | ||||
| -rw-r--r-- | lisp/net/telnet.el | 2 |
3 files changed, 3 insertions, 3 deletions
diff --git a/lisp/net/newst-backend.el b/lisp/net/newst-backend.el index dc541943587..27ea713d0e5 100644 --- a/lisp/net/newst-backend.el +++ b/lisp/net/newst-backend.el @@ -2183,7 +2183,7 @@ FEED is a symbol!" (progn (when (y-or-n-p "Old newsticker cache file exists. Read it? ") (newsticker--cache-read-version1)) - (when (y-or-n-p (format "Delete old newsticker cache file? ")) + (when (y-or-n-p "Delete old newsticker cache file? ") (delete-file newsticker-cache-filename))) (dolist (f (append newsticker-url-list-defaults newsticker-url-list)) (newsticker--cache-read-feed (car f))))) diff --git a/lisp/net/soap-inspect.el b/lisp/net/soap-inspect.el index 2192a687913..b994b0ed862 100644 --- a/lisp/net/soap-inspect.el +++ b/lisp/net/soap-inspect.el @@ -124,7 +124,7 @@ This is a specialization of `soap-sample-value' for (format "a string between %d and %d chars long" low high)) (low (format "a string at least %d chars long" low)) (high (format "a string at most %d chars long" high)) - (t (format "a string OOPS"))))) + (t "a string OOPS")))) ((soap-xs-simple-type-integer-range type) (cl-destructuring-bind (min . max) (soap-xs-simple-type-integer-range type) (cond diff --git a/lisp/net/telnet.el b/lisp/net/telnet.el index 17168539237..1cf07a5ccec 100644 --- a/lisp/net/telnet.el +++ b/lisp/net/telnet.el @@ -107,7 +107,7 @@ rejecting one login and prompting again for a username and password.") (let (revert-buffer-function) (revert-buffer ignore-auto noconfirm)) (if (or noconfirm - (yes-or-no-p (format "Restart connection? "))) + (yes-or-no-p "Restart connection? ")) (apply telnet-connect-command)))) (defun telnet-c-z () |