diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2021-09-21 17:52:53 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-09-21 17:52:53 +0200 |
| commit | 43c1ee90cb3333dc2643e58cf607399b0abebf43 (patch) | |
| tree | 0a5b2c0f6330f27d16e1d55943783c1942ef21bf /lisp/net | |
| parent | 18ad9dfe9592cc62a3d617ef8661913c6bbec020 (diff) | |
| download | emacs-43c1ee90cb3333dc2643e58cf607399b0abebf43.tar.gz emacs-43c1ee90cb3333dc2643e58cf607399b0abebf43.tar.bz2 emacs-43c1ee90cb3333dc2643e58cf607399b0abebf43.zip | |
Don't use `format' on strings without % format directives
* lisp/vc/ediff-init.el (ediff-BAD-INFO):
* lisp/url/url-ldap.el (url-ldap):
* lisp/url/url-http.el (url-http--user-agent-default-string):
* lisp/textmodes/reftex.el (reftex-access-parse-file):
* lisp/textmodes/reftex-index.el (reftex-index-phrases-info):
* lisp/textmodes/ispell.el (ispell-create-debug-buffer):
* lisp/term.el (serial-read-speed):
* lisp/progmodes/verilog-mode.el (verilog-scan-debug):
* lisp/progmodes/idlwave.el (idlwave-find-module):
* lisp/progmodes/compile.el (compilation-revert-buffer):
* lisp/org/org-agenda.el (org-search-view):
* lisp/net/telnet.el (telnet-revert-buffer):
* lisp/net/soap-inspect.el (soap-sample-value-for-xs-simple-type):
* lisp/net/newst-backend.el (newsticker--cache-read):
* lisp/mh-e/mh-seq.el (mh-msg-is-in-seq):
* lisp/mail/smtpmail.el (smtpmail-via-smtp):
* lisp/mail/emacsbug.el (report-emacs-bug):
* lisp/jsonrpc.el (jsonrpc-error):
* lisp/help-fns.el (describe-variable):
* lisp/gnus/mm-decode.el (mm-possibly-verify-or-decrypt):
* lisp/gnus/gnus.el (gnus-group-startup-message):
(gnus-group-startup-message):
* lisp/gnus/gnus-group.el (gnus-group-restart):
* lisp/frame.el (make-frame-on-display):
* lisp/emulation/viper-ex.el (ex-help):
* lisp/calendar/icalendar.el (icalendar--convert-ical-to-diary):
(icalendar--add-diary-entry):
* lisp/calendar/cal-tex.el (cal-tex-end-document):
* lisp/calc/calcalg3.el (math-ninteg-romberg): Don't use `format'
on strings that have no % format directives in them.
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 () |