aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/gnus
diff options
context:
space:
mode:
authorPaul Eggert2019-11-11 10:30:13 -0800
committerPaul Eggert2019-11-11 10:32:53 -0800
commit6b4a97c1c78f39ce890d100acceceb652d14e20d (patch)
tree9d9f8347a952226adcd73680ed89c5679d6e5326 /lisp/gnus
parent269796288a43520a1dcc481337af472d086faaa4 (diff)
downloademacs-6b4a97c1c78f39ce890d100acceceb652d14e20d.tar.gz
emacs-6b4a97c1c78f39ce890d100acceceb652d14e20d.zip
Fix some quoting glitches in doc strings
Diffstat (limited to 'lisp/gnus')
-rw-r--r--lisp/gnus/gnus-diary.el2
-rw-r--r--lisp/gnus/gnus-msg.el4
-rw-r--r--lisp/gnus/gnus-registry.el4
-rw-r--r--lisp/gnus/gnus-score.el2
-rw-r--r--lisp/gnus/gnus-sum.el2
-rw-r--r--lisp/gnus/nndiary.el8
-rw-r--r--lisp/gnus/nnimap.el2
-rw-r--r--lisp/gnus/nnir.el2
-rw-r--r--lisp/gnus/nnmairix.el8
-rw-r--r--lisp/gnus/spam.el10
10 files changed, 22 insertions, 22 deletions
diff --git a/lisp/gnus/gnus-diary.el b/lisp/gnus/gnus-diary.el
index 16973074be4..1697a633680 100644
--- a/lisp/gnus/gnus-diary.el
+++ b/lisp/gnus/gnus-diary.el
@@ -64,7 +64,7 @@ Please refer to `format-time-string' for information on possible values."
64 "Function called to format a diary delay string. 64 "Function called to format a diary delay string.
65It is passed two arguments. The first one is non-nil if the delay is in 65It is passed two arguments. The first one is non-nil if the delay is in
66the past. The second one is of the form ((NUM . UNIT) ...) where NUM is 66the past. The second one is of the form ((NUM . UNIT) ...) where NUM is
67an integer and UNIT is one of 'year 'month 'week 'day 'hour or 'minute. 67an integer and UNIT is one of `year' `month' `week' `day' `hour' or `minute'.
68It should return strings like \"In 2 months, 3 weeks\", \"3 hours, 68It should return strings like \"In 2 months, 3 weeks\", \"3 hours,
691 minute ago\" and so on. 691 minute ago\" and so on.
70 70
diff --git a/lisp/gnus/gnus-msg.el b/lisp/gnus/gnus-msg.el
index 10793455a52..17f1086195e 100644
--- a/lisp/gnus/gnus-msg.el
+++ b/lisp/gnus/gnus-msg.el
@@ -637,7 +637,7 @@ If ARG is 1, prompt for group name to post to.
637 637
638This function prepares a news even when using mail groups. This is useful 638This function prepares a news even when using mail groups. This is useful
639for posting messages to mail groups without actually sending them over the 639for posting messages to mail groups without actually sending them over the
640network. The corresponding back end must have a 'request-post method." 640network. The corresponding back end must have a `request-post' method."
641 (interactive "P") 641 (interactive "P")
642 ;; We can't `let' gnus-newsgroup-name here, since that leads 642 ;; We can't `let' gnus-newsgroup-name here, since that leads
643 ;; to local variables leaking. 643 ;; to local variables leaking.
@@ -714,7 +714,7 @@ If ARG, don't do that. If ARG is 1, prompt for group name to post to.
714 714
715This function prepares a news even when using mail groups. This is useful 715This function prepares a news even when using mail groups. This is useful
716for posting messages to mail groups without actually sending them over the 716for posting messages to mail groups without actually sending them over the
717network. The corresponding back end must have a 'request-post method." 717network. The corresponding back end must have a `request-post' method."
718 (interactive "P") 718 (interactive "P")
719 ;; We can't `let' gnus-newsgroup-name here, since that leads 719 ;; We can't `let' gnus-newsgroup-name here, since that leads
720 ;; to local variables leaking. 720 ;; to local variables leaking.
diff --git a/lisp/gnus/gnus-registry.el b/lisp/gnus/gnus-registry.el
index 16e578cc745..e6fb382c2f9 100644
--- a/lisp/gnus/gnus-registry.el
+++ b/lisp/gnus/gnus-registry.el
@@ -145,7 +145,7 @@ recipients."
145 '("delayed$" "drafts$" "queue$" "INBOX$" "^nnmairix:" "archive") 145 '("delayed$" "drafts$" "queue$" "INBOX$" "^nnmairix:" "archive")
146 "List of groups that gnus-registry-split-fancy-with-parent won't return. 146 "List of groups that gnus-registry-split-fancy-with-parent won't return.
147The group names are matched, they don't have to be fully 147The group names are matched, they don't have to be fully
148qualified. This parameter tells the Gnus registry 'never split a 148qualified. This parameter tells the Gnus registry `never split a
149message into a group that matches one of these, regardless of 149message into a group that matches one of these, regardless of
150references.' 150references.'
151 151
@@ -211,7 +211,7 @@ groups."
211 211
212(defcustom gnus-registry-extra-entries-precious '(mark) 212(defcustom gnus-registry-extra-entries-precious '(mark)
213 "What extra keys are precious, meaning entries with them won't get pruned. 213 "What extra keys are precious, meaning entries with them won't get pruned.
214By default, 'mark is included, so articles with marks are 214By default, `mark' is included, so articles with marks are
215considered precious. 215considered precious.
216 216
217Before you save the Gnus registry, it's pruned. Any entries with 217Before you save the Gnus registry, it's pruned. Any entries with
diff --git a/lisp/gnus/gnus-score.el b/lisp/gnus/gnus-score.el
index 72fcc641559..b66489aae95 100644
--- a/lisp/gnus/gnus-score.el
+++ b/lisp/gnus/gnus-score.el
@@ -826,7 +826,7 @@ HEADER is the header being scored.
826MATCH is the string we are looking for. 826MATCH is the string we are looking for.
827TYPE is the match type: substring, regexp, exact, fuzzy. 827TYPE is the match type: substring, regexp, exact, fuzzy.
828SCORE is the score to add. 828SCORE is the score to add.
829DATE is the expire date, or nil for no expire, or 'now for immediate expire. 829DATE is the expire date, or nil for no expire, or `now' for immediate expire.
830If optional argument `PROMPT' is non-nil, allow user to edit match. 830If optional argument `PROMPT' is non-nil, allow user to edit match.
831If optional argument `SILENT' is nil, show effect of score entry. 831If optional argument `SILENT' is nil, show effect of score entry.
832If optional argument `EXTRA' is non-nil, it's a non-standard overview header." 832If optional argument `EXTRA' is non-nil, it's a non-standard overview header."
diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el
index f21bc7584e5..b8859528d0b 100644
--- a/lisp/gnus/gnus-sum.el
+++ b/lisp/gnus/gnus-sum.el
@@ -9127,7 +9127,7 @@ a non-numeric prefix arg will use nnir to search the entire
9127server; without a prefix arg only the current group is 9127server; without a prefix arg only the current group is
9128searched. If the variable `gnus-refer-thread-use-nnir' is 9128searched. If the variable `gnus-refer-thread-use-nnir' is
9129non-nil the prefix arg has the reverse meaning. If no 9129non-nil the prefix arg has the reverse meaning. If no
9130backend-specific 'request-thread function is available fetch 9130backend-specific `request-thread' function is available fetch
9131LIMIT (the numerical prefix) old headers. If LIMIT is 9131LIMIT (the numerical prefix) old headers. If LIMIT is
9132non-numeric or nil fetch the number specified by the 9132non-numeric or nil fetch the number specified by the
9133`gnus-refer-thread-limit' variable." 9133`gnus-refer-thread-limit' variable."
diff --git a/lisp/gnus/nndiary.el b/lisp/gnus/nndiary.el
index f79d8f17072..a340804064f 100644
--- a/lisp/gnus/nndiary.el
+++ b/lisp/gnus/nndiary.el
@@ -124,13 +124,13 @@ Hortense, would you be so kind as to remind me of my appointments 3 days
124before the date, thank you very much. Anda, hmmm... by the way, are you 124before the date, thank you very much. Anda, hmmm... by the way, are you
125doing anything special tonight ?\". 125doing anything special tonight ?\".
126 126
127The units of measure are 'minute 'hour 'day 'week 'month and 'year (no, 127The units of measure are `minute' `hour' `day' `week' `month' and `year' (no,
128not 'century, sorry). 128not `century', sorry).
129 129
130NOTE: the units of measure actually express dates, not durations: if you 130NOTE: the units of measure actually express dates, not durations: if you
131use 'week, messages will pop up on Sundays at 00:00 (or Mondays if 131use `week', messages will pop up on Sundays at 00:00 (or Mondays if
132`nndiary-week-starts-on-monday' is non-nil) and *not* 7 days before the 132`nndiary-week-starts-on-monday' is non-nil) and *not* 7 days before the
133appointment, if you use 'month, messages will pop up on the first day of 133appointment, if you use `month', messages will pop up on the first day of
134each months, at 00:00 and so on. 134each months, at 00:00 and so on.
135 135
136If you really want to specify a duration (like 24 hours exactly), you can 136If you really want to specify a duration (like 24 hours exactly), you can
diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el
index 856ac75cd66..800ec3b9597 100644
--- a/lisp/gnus/nnimap.el
+++ b/lisp/gnus/nnimap.el
@@ -1134,7 +1134,7 @@ If LIMIT, first try to limit the search to the N last articles."
1134 (nnimap-command "UID EXPUNGE %s" 1134 (nnimap-command "UID EXPUNGE %s"
1135 (nnimap-article-ranges articles)) 1135 (nnimap-article-ranges articles))
1136 (nnheader-message 1136 (nnheader-message
1137 3 (concat "nnimap-expunge set to 'immediately, but " 1137 3 (concat "nnimap-expunge set to `immediately', but "
1138 "server doesn't support UIDPLUS")) 1138 "server doesn't support UIDPLUS"))
1139 nil)) 1139 nil))
1140 1140
diff --git a/lisp/gnus/nnir.el b/lisp/gnus/nnir.el
index 7cb2d1615a2..b8a6639719e 100644
--- a/lisp/gnus/nnir.el
+++ b/lisp/gnus/nnir.el
@@ -317,7 +317,7 @@ If nil this will use `gnus-summary-line-format'."
317(defcustom nnir-retrieve-headers-override-function nil 317(defcustom nnir-retrieve-headers-override-function nil
318 "If non-nil, a function that accepts an article list and group 318 "If non-nil, a function that accepts an article list and group
319and populates the `nntp-server-buffer' with the retrieved 319and populates the `nntp-server-buffer' with the retrieved
320headers. Must return either 'nov or 'headers indicating the 320headers. Must return either `nov' or `headers' indicating the
321retrieved header format. 321retrieved header format.
322 322
323If this variable is nil, or if the provided function returns nil for 323If this variable is nil, or if the provided function returns nil for
diff --git a/lisp/gnus/nnmairix.el b/lisp/gnus/nnmairix.el
index 6c5502ac3d9..d0a38e17c8e 100644
--- a/lisp/gnus/nnmairix.el
+++ b/lisp/gnus/nnmairix.el
@@ -301,7 +301,7 @@ The default chooses the largest window in the current frame."
301 301
302(defcustom nnmairix-propagate-marks-upon-close t 302(defcustom nnmairix-propagate-marks-upon-close t
303 "Flag if marks should be propagated upon closing a group. 303 "Flag if marks should be propagated upon closing a group.
304The default of this variable is t. If set to 'ask, the 304The default of this variable is t. If set to `ask', the
305user will be asked if the flags should be propagated when the 305user will be asked if the flags should be propagated when the
306group is closed. If set to nil, the user will have to manually 306group is closed. If set to nil, the user will have to manually
307call `nnmairix-propagate-marks'." 307call `nnmairix-propagate-marks'."
@@ -1400,7 +1400,7 @@ nnmairix with nnml backends."
1400 "Replace folder names in Xref header and correct article numbers. 1400 "Replace folder names in Xref header and correct article numbers.
1401Do this for all ARTICLES on BACKENDGROUP. Replace using 1401Do this for all ARTICLES on BACKENDGROUP. Replace using
1402MAIRIXGROUP. NUMC contains values for article number correction. 1402MAIRIXGROUP. NUMC contains values for article number correction.
1403TYPE is either 'nov or 'headers." 1403TYPE is either `nov' or `headers'."
1404 (nnheader-message 7 "nnmairix: Rewriting headers...") 1404 (nnheader-message 7 "nnmairix: Rewriting headers...")
1405 (cond 1405 (cond
1406 ((eq type 'nov) 1406 ((eq type 'nov)
@@ -1449,7 +1449,7 @@ TYPE is either 'nov or 'headers."
1449(defun nnmairix-backend-to-server (server) 1449(defun nnmairix-backend-to-server (server)
1450 "Return nnmairix server most probably responsible for back end SERVER. 1450 "Return nnmairix server most probably responsible for back end SERVER.
1451User will be asked if this cannot be determined. Result is saved in 1451User will be asked if this cannot be determined. Result is saved in
1452parameter 'indexed-servers of corresponding default search 1452parameter `indexed-servers' of corresponding default search
1453group." 1453group."
1454 (let ((allservers (nnmairix-get-nnmairix-servers)) 1454 (let ((allservers (nnmairix-get-nnmairix-servers))
1455 mairixserver found defaultgroup) 1455 mairixserver found defaultgroup)
@@ -1459,7 +1459,7 @@ group."
1459 (while (and allservers (not found)) 1459 (while (and allservers (not found))
1460 (setq mairixserver (gnus-server-to-method (car (pop allservers)))) 1460 (setq mairixserver (gnus-server-to-method (car (pop allservers))))
1461 ;; First we look if SERVER is the backend of current nnmairix server 1461 ;; First we look if SERVER is the backend of current nnmairix server
1462 (setq found (and (eq (cadr (assoc 'nnmairix-backend mairixserver)) 1462 (setq found (and (eq (cadr (assoc `nnmairix-backend mairixserver))
1463 (car server)) 1463 (car server))
1464 (string= (cadr (assoc 'nnmairix-backend-server mairixserver)) 1464 (string= (cadr (assoc 'nnmairix-backend-server mairixserver))
1465 (nth 1 server)))) 1465 (nth 1 server))))
diff --git a/lisp/gnus/spam.el b/lisp/gnus/spam.el
index c701e314fc0..83df2f6198f 100644
--- a/lisp/gnus/spam.el
+++ b/lisp/gnus/spam.el
@@ -831,8 +831,8 @@ backend is STATISTICAL."
831 831
832(defun spam-backend-list (&optional type) 832(defun spam-backend-list (&optional type)
833 "Return a list of all the backend symbols, constrained by TYPE. 833 "Return a list of all the backend symbols, constrained by TYPE.
834When TYPE is 'non-mover, only non-mover backends are returned. 834When TYPE is `non-mover', only non-mover backends are returned.
835When TYPE is 'mover, only mover backends are returned." 835When TYPE is `mover', only mover backends are returned."
836 (let (list) 836 (let (list)
837 (dolist (backend spam-backends) 837 (dolist (backend spam-backends)
838 (when (or 838 (when (or
@@ -882,8 +882,8 @@ that the message is definitely a spam."
882 882
883(defun spam-backend-function (backend classification type) 883(defun spam-backend-function (backend classification type)
884 "Get the BACKEND function for CLASSIFICATION and TYPE. 884 "Get the BACKEND function for CLASSIFICATION and TYPE.
885TYPE is 'registration or 'unregistration. 885TYPE is `registration' or `unregistration'.
886CLASSIFICATION is 'ham or 'spam." 886CLASSIFICATION is `ham' or `spam'."
887 (if (and 887 (if (and
888 (spam-classification-valid-p classification) 888 (spam-classification-valid-p classification)
889 (spam-backend-function-type-valid-p type)) 889 (spam-backend-function-type-valid-p type))
@@ -1520,7 +1520,7 @@ In the case of mover backends, checks the setting of
1520(defun spam-fetch-field-fast (article field &optional prepared-data-header) 1520(defun spam-fetch-field-fast (article field &optional prepared-data-header)
1521 "Fetch a FIELD for ARTICLE with the internal `gnus-data-find' function. 1521 "Fetch a FIELD for ARTICLE with the internal `gnus-data-find' function.
1522When PREPARED-DATA-HEADER is given, don't look in the Gnus data. 1522When PREPARED-DATA-HEADER is given, don't look in the Gnus data.
1523When FIELD is 'number, ARTICLE can be any number (since we want 1523When FIELD is `number', ARTICLE can be any number (since we want
1524to find it out)." 1524to find it out)."
1525 (when (numberp article) 1525 (when (numberp article)
1526 (let* ((data-header (or prepared-data-header 1526 (let* ((data-header (or prepared-data-header