1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 06:20:55 -08:00

Don't quote symbols 'like-this' in docstrings etc.

* admin/unidata/uvs.el (uvs-insert-fields-as-bytes):
* lisp/allout-widgets.el (allout-widgets-count-buttons-in-region):
* lisp/allout.el (allout-add-resumptions, allout-mode):
* lisp/calculator.el (calculator-operators):
* lisp/cedet/data-debug.el (dd-propertize):
* lisp/cedet/ede/proj-prog.el (ede-proj-target-makefile-program):
* lisp/cedet/semantic/analyze/debug.el:
(semantic-analyzer-debug-global-miss-text):
* lisp/cedet/semantic/lex-spp.el:
(semantic-lex-spp-replace-or-symbol-or-keyword):
* lisp/cedet/semantic/symref.el:
(semantic-symref-cleanup-recent-buffers-fcn):
* lisp/cedet/semantic/tag.el (semantic-tag-class):
* lisp/cedet/srecode/el.el (srecode-semantic-handle-:el-custom):
* lisp/gnus/nnmairix.el (nnmairix-propagate-marks-upon-close):
* lisp/gnus/pop3.el (pop3-authentication-scheme):
* lisp/help-fns.el (describe-function-orig-buffer):
* lisp/imenu.el (imenu--history-list):
* lisp/mail/feedmail.el (feedmail-confirm-outgoing)
(feedmail-display-full-frame, feedmail-deduce-bcc-where)
(feedmail-queue-default-file-slug)
(feedmail-queue-buffer-file-name):
* lisp/net/mairix.el (mairix-searches-mode-map):
* lisp/net/newst-backend.el (newsticker-retrieval-method)
(newsticker-auto-mark-filter-list):
* lisp/obsolete/vi.el (vi-mode):
* lisp/progmodes/cc-engine.el (c-literal-type):
* lisp/progmodes/cpp.el (cpp-face):
* lisp/progmodes/ebrowse.el (ebrowse-electric-list-looper):
* lisp/progmodes/elisp-mode.el (elisp--xref-make-xref):
* lisp/progmodes/pascal.el (pascal-auto-lineup):
* lisp/progmodes/prog-mode.el (prog-widen):
* lisp/progmodes/verilog-mode.el (verilog-regexp-words)
(verilog-auto-lineup, verilog-auto-reset-widths)
(verilog-auto-arg-format, verilog-auto-inst-template-numbers):
* lisp/textmodes/flyspell.el (flyspell-maybe-correct-transposition)
(flyspell-maybe-correct-doubling):
* lisp/textmodes/table.el (table-justify, table-justify-cell)
(table-justify-row, table-justify-column, table-insert-sequence)
(table--justify-cell-contents):
* lisp/url/url-auth.el (url-get-authentication):
* lisp/window.el (display-buffer-record-window):
* lisp/xml.el (xml-parse-file, xml-parse-region):
* src/gfilenotify.c (Fgfile_add_watch):
Don't quote symbols with apostrophes in doc strings.
Use asymmetric quotes instead.
* lisp/cedet/semantic/complete.el (semantic-displayor-show-request):
Likewise for symbol in diagnostic.
* lisp/image.el (image-extension-data):
* lisp/register.el (frame-configuration-to-register):
* src/buffer.c (syms_of_buffer):
Remove bogus apostrophes after symbols.
* lisp/thumbs.el (thumbs-conversion-program):
Quote Lisp string values using double-quotes, not apostrophes.
This commit is contained in:
Paul Eggert 2015-08-20 17:33:48 -07:00
parent daf390b5e9
commit 760701ebe1
37 changed files with 103 additions and 103 deletions

View file

@ -114,7 +114,7 @@ The most significant byte comes first."
"Insert VALUES for FIELDS as a sequence of bytes to the current buffer. "Insert VALUES for FIELDS as a sequence of bytes to the current buffer.
VALUES and FIELDS are lists of integers and field symbols, VALUES and FIELDS are lists of integers and field symbols,
respectively. Byte length of each value is determined by the respectively. Byte length of each value is determined by the
'uvs-field-size' property of the corresponding field." `uvs-field-size' property of the corresponding field."
(while fields (while fields
(let ((field (car fields)) (let ((field (car fields))
(value (car values))) (value (car values)))

View file

@ -2372,7 +2372,7 @@ The elements of LIST are not copied, just the list structure itself."
(car list))) (car list)))
;;;_ . allout-widgets-count-buttons-in-region (start end) ;;;_ . allout-widgets-count-buttons-in-region (start end)
(defun allout-widgets-count-buttons-in-region (start end) (defun allout-widgets-count-buttons-in-region (start end)
"Debugging/diagnostic tool - count overlays with 'button' property in region." "Debugging/diagnostic tool - count overlays with `button' property in region."
(interactive "r") (interactive "r")
(setq start (or start (point-min)) (setq start (or start (point-min))
end (or end (point-max))) end (or end (point-max)))

View file

@ -1330,11 +1330,11 @@ cdr is the new value: '(some-var some-value)'. The pairs can actually be
triples, where the third element qualifies the disposition of the setting, triples, where the third element qualifies the disposition of the setting,
as described further below. as described further below.
If the optional third element is the symbol 'extend, then the new value If the optional third element is the symbol `extend', then the new value
created by `cons'ing the second element of the pair onto the front of the created by `cons'ing the second element of the pair onto the front of the
existing value. existing value.
If the optional third element is the symbol 'append, then the new value is If the optional third element is the symbol `append', then the new value is
extended from the existing one by `append'ing a list containing the second extended from the existing one by `append'ing a list containing the second
element of the pair onto the end of the existing value. element of the pair onto the end of the existing value.
@ -1838,7 +1838,7 @@ M-x outlineify-sticky Activate outline mode for current buffer,
buffer with name derived from derived from that buffer with name derived from derived from that
of current buffer -- \"*BUFFERNAME exposed*\". of current buffer -- \"*BUFFERNAME exposed*\".
\\[allout-flatten-exposed-to-buffer] `allout-flatten-exposed-to-buffer' \\[allout-flatten-exposed-to-buffer] `allout-flatten-exposed-to-buffer'
Like above 'copy-exposed', but convert topic Like above `copy-exposed', but convert topic
prefixes to section.subsection... numeric prefixes to section.subsection... numeric
format. format.
\\[customize-variable] allout-auto-activation \\[customize-variable] allout-auto-activation

View file

@ -311,7 +311,7 @@ user-defined operators, use `calculator-user-operators' instead.")
9 (highest) (optional, defaults to 1); 9 (highest) (optional, defaults to 1);
It it possible have a unary prefix version of a binary operator if it It it possible have a unary prefix version of a binary operator if it
comes later in this list. If the list begins with the symbol 'nobind, comes later in this list. If the list begins with the symbol `nobind',
then no key binding will take place -- this is only useful for then no key binding will take place -- this is only useful for
predefined keys. predefined keys.

View file

@ -55,7 +55,7 @@
(defalias 'data-debug-overlay-p 'extentp) (defalias 'data-debug-overlay-p 'extentp)
(if (not (fboundp 'propertize)) (if (not (fboundp 'propertize))
(defun dd-propertize (string &rest properties) (defun dd-propertize (string &rest properties)
"Mimic 'propertize' in from Emacs 23." "Mimic `propertize' in from Emacs 23."
(add-text-properties 0 (length string) properties string) (add-text-properties 0 (length string) properties string)
string string
) )

View file

@ -62,7 +62,7 @@ specified with ldlibs.")
"Libraries, such as \"m\" or \"Xt\" which this program depends on. "Libraries, such as \"m\" or \"Xt\" which this program depends on.
The linker flag \"-l\" is automatically prepended. Do not include a \"lib\" The linker flag \"-l\" is automatically prepended. Do not include a \"lib\"
prefix, or a \".so\" suffix. prefix, or a \".so\" suffix.
Use the 'ldflags' slot to specify where in-project libraries might be. Use the `ldflags' slot to specify where in-project libraries might be.
Note: Currently only used for Automake projects." Note: Currently only used for Automake projects."
) )

View file

@ -512,7 +512,7 @@ Optional argument CLASSCONSTRAINT says to output to tags of that class."
) )
(defun semantic-analyzer-debug-global-miss-text (name-in) (defun semantic-analyzer-debug-global-miss-text (name-in)
"Use 'princ' to show text describing not finding symbol NAME-IN. "Use `princ' to show text describing not finding symbol NAME-IN.
NAME is the name of the unfound symbol." NAME is the name of the unfound symbol."
(let ((name (cond ((stringp name-in) (let ((name (cond ((stringp name-in)
name-in) name-in)

View file

@ -1665,7 +1665,7 @@ Display mechanism using tooltip for a list of possible completions.")
(when (>= (oref obj typing-count) 5) (when (>= (oref obj typing-count) 5)
(oset obj mode 'standard) (oset obj mode 'standard)
(setq mode 'standard) (setq mode 'standard)
(message "Resetting inline-mode to 'standard'.")) (message "Resetting inline-mode to standard."))
(when (and (> numcompl max-tags) (when (and (> numcompl max-tags)
(< (oref obj typing-count) 2)) (< (oref obj typing-count) 2))
;; Discretely hint at completion availability. ;; Discretely hint at completion availability.

View file

@ -919,7 +919,7 @@ STR occurs in the current buffer between BEG and END."
)) ))
(define-lex-regex-analyzer semantic-lex-spp-replace-or-symbol-or-keyword (define-lex-regex-analyzer semantic-lex-spp-replace-or-symbol-or-keyword
"Like 'semantic-lex-symbol-or-keyword' plus preprocessor macro replacement." "Like `semantic-lex-symbol-or-keyword' plus preprocessor macro replacement."
"\\(\\sw\\|\\s_\\)+" "\\(\\sw\\|\\s_\\)+"
(let ((str (match-string 0)) (let ((str (match-string 0))
(beg (match-beginning 0)) (beg (match-beginning 0))

View file

@ -337,7 +337,7 @@ Use the `semantic-symref-hit-tags' method to get this list.")
"List of buffers opened by `semantic-symref-result-get-tags'.") "List of buffers opened by `semantic-symref-result-get-tags'.")
(defun semantic-symref-cleanup-recent-buffers-fcn () (defun semantic-symref-cleanup-recent-buffers-fcn ()
"Hook function to be used in 'post-command-hook' to cleanup buffers. "Hook function to be used in `post-command-hook' to cleanup buffers.
Buffers collected during symref can result in some files being Buffers collected during symref can result in some files being
opened multiple times for one operation. This will keep buffers open opened multiple times for one operation. This will keep buffers open
until the next command is executed." until the next command is executed."

View file

@ -95,7 +95,7 @@ print statement."
(defsubst semantic-tag-class (tag) (defsubst semantic-tag-class (tag)
"Return the class of TAG. "Return the class of TAG.
That is, the symbol 'variable, 'function, 'type, or other. This is a symbol like `variable', `function', or `type'.
There is no limit to the symbols that may represent the class of a tag. There is no limit to the symbols that may represent the class of a tag.
Each parser generates tags with classes defined by it. Each parser generates tags with classes defined by it.

View file

@ -50,7 +50,7 @@ Adds the following:
(defun srecode-semantic-handle-:el-custom (dict) (defun srecode-semantic-handle-:el-custom (dict)
"Add macros into the dictionary DICT based on the current Emacs Lisp file. "Add macros into the dictionary DICT based on the current Emacs Lisp file.
Adds the following: Adds the following:
GROUP - The 'defgroup' name we guess you want for variables. GROUP - The `defgroup' name we guess you want for variables.
FACEGROUP - The `defgroup' name you might want for faces." FACEGROUP - The `defgroup' name you might want for faces."
(require 'semantic/db-find) (require 'semantic/db-find)
(let ((groups (semanticdb-strip-find-results (let ((groups (semanticdb-strip-find-results

View file

@ -311,7 +311,7 @@ The default chooses the largest window in the current frame."
The default of this variable is t. If set to 'ask, the The default of this variable is t. If set to 'ask, the
user will be asked if the flags should be propagated when the user will be asked if the flags should be propagated when the
group is closed. If set to nil, the user will have to manually group is closed. If set to nil, the user will have to manually
call 'nnmairix-propagate-marks'." call `nnmairix-propagate-marks'."
:version "23.1" :version "23.1"
:type '(choice (const :tag "always" t) :type '(choice (const :tag "always" t)
(const :tag "ask" ask) (const :tag "ask" ask)

View file

@ -82,7 +82,7 @@
(defcustom pop3-authentication-scheme 'pass (defcustom pop3-authentication-scheme 'pass
"*POP3 authentication scheme. "*POP3 authentication scheme.
Defaults to `pass', for the standard USER/PASS authentication. The other Defaults to `pass', for the standard USER/PASS authentication. The other
valid value is 'apop'." valid value is `apop'."
:type '(choice (const :tag "Normal user/password" pass) :type '(choice (const :tag "Normal user/password" pass)
(const :tag "APOP" apop)) (const :tag "APOP" apop))
:version "22.1" ;; Oort Gnus :version "22.1" ;; Oort Gnus

View file

@ -44,7 +44,7 @@ The functions will receive the function name as argument.")
;; Functions ;; Functions
(defvar describe-function-orig-buffer nil (defvar describe-function-orig-buffer nil
"Buffer that was current when 'describe-function' was invoked. "Buffer that was current when `describe-function' was invoked.
Functions on 'help-fns-describe-function-functions' can use this Functions on 'help-fns-describe-function-functions' can use this
to get buffer-local values.") to get buffer-local values.")

View file

@ -357,7 +357,7 @@ Optional DATA-P non-nil means SOURCE is a string containing image data."
(if (fboundp 'image-metadata) ; eg not --without-x (if (fboundp 'image-metadata) ; eg not --without-x
(define-obsolete-function-alias 'image-extension-data (define-obsolete-function-alias 'image-extension-data
'image-metadata' "24.1")) 'image-metadata "24.1"))
(define-obsolete-variable-alias (define-obsolete-variable-alias
'image-library-alist 'image-library-alist

View file

@ -476,7 +476,7 @@ element recalculates the buffer's index alist.")
(defvar imenu--history-list nil (defvar imenu--history-list nil
;; Making this buffer local caused it not to work! ;; Making this buffer local caused it not to work!
"History list for 'jump-to-function-in-buffer'.") "History list for `jump-to-function-in-buffer'.")
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; ;;;

View file

@ -399,10 +399,10 @@
"If non-nil, give a y-or-n confirmation prompt before sending mail. "If non-nil, give a y-or-n confirmation prompt before sending mail.
This is done after the message is completely prepped, and you'll be This is done after the message is completely prepped, and you'll be
looking at the top of the message in a buffer when you get the prompt. looking at the top of the message in a buffer when you get the prompt.
If set to the symbol 'queued, give the confirmation prompt only while If set to the symbol `queued', give the confirmation prompt only while
running the queue (however, the prompt is always suppressed if you are running the queue (however, the prompt is always suppressed if you are
processing the queue via `feedmail-run-the-queue-no-prompts'). If set processing the queue via `feedmail-run-the-queue-no-prompts'). If set
to the symbol 'immediate, give the confirmation prompt only when to the symbol `immediate', give the confirmation prompt only when
sending immediately. For any other non-nil value, prompt in both sending immediately. For any other non-nil value, prompt in both
cases. You can give a timeout for the prompt; see variable cases. You can give a timeout for the prompt; see variable
`feedmail-confirm-outgoing-timeout'." `feedmail-confirm-outgoing-timeout'."
@ -418,9 +418,9 @@ cases. You can give a timeout for the prompt; see variable
If nil, the prepped message will be shown, for confirmation or If nil, the prepped message will be shown, for confirmation or
otherwise, in some window in the current frame without resizing otherwise, in some window in the current frame without resizing
anything. That may or may not display enough of the message to anything. That may or may not display enough of the message to
distinguish it from others. If set to the symbol 'queued, take distinguish it from others. If set to the symbol queued, take
this action only when running the queue. If set to the symbol this action only when running the queue. If set to the symbol
'immediate, take this action only when sending immediately. For immediate, take this action only when sending immediately. For
any other non-nil value, take the action in both cases. Even if any other non-nil value, take the action in both cases. Even if
you're not confirming the sending of immediate or queued messages, you're not confirming the sending of immediate or queued messages,
it can still be interesting to see a lot about them as they are it can still be interesting to see a lot about them as they are
@ -471,9 +471,9 @@ Addresses for the message envelope are deduced by examining
appropriate address headers in the message. Generally, they will show appropriate address headers in the message. Generally, they will show
up in the list of deduced addresses in the order that the headers up in the list of deduced addresses in the order that the headers
happen to appear (duplicate addresses are eliminated in any case). happen to appear (duplicate addresses are eliminated in any case).
This variable can be set to the symbol 'first, in which case the This variable can be set to the symbol first, in which case the
Bcc:/Resent-Bcc: addresses will appear at the beginning in the list; Bcc:/Resent-Bcc: addresses will appear at the beginning in the list;
or, it can be set to the symbol 'last, in which case they will appear or, it can be set to the symbol last, in which case they will appear
at the end of the list. at the end of the list.
Why should you care? Well, maybe you don't, and certainly the same Why should you care? Well, maybe you don't, and certainly the same
@ -484,7 +484,7 @@ addresses are not handled first, there can be substantial delays in
seeing the message again. Some configurations of sendmail, for example, seeing the message again. Some configurations of sendmail, for example,
seem to try to deliver to each addressee at least once, immediately seem to try to deliver to each addressee at least once, immediately
and serially, so slow SMTP conversations can add up to a delay. There and serially, so slow SMTP conversations can add up to a delay. There
is an option for either 'first or 'last because you might have a is an option for either first or last because you might have a
delivery agent that processes the addresses backwards." delivery agent that processes the addresses backwards."
:group 'feedmail-headers :group 'feedmail-headers
:type '(choice (const nil) :type '(choice (const nil)
@ -1231,7 +1231,7 @@ If a string, it is used directly.
If a function, it is called with no arguments from the buffer containing the raw If a function, it is called with no arguments from the buffer containing the raw
text of the message. It must return a string (which may be empty). text of the message. It must return a string (which may be empty).
If the symbol 'ask, you will be prompted for a string in the mini-buffer. If the symbol `ask', you will be prompted for a string in the mini-buffer.
Filename completion is available so that you can inspect what's already been Filename completion is available so that you can inspect what's already been
used, but feedmail will do further manipulation on the string you return, so used, but feedmail will do further manipulation on the string you return, so
it's not expected to be a complete filename." it's not expected to be a complete filename."
@ -1301,27 +1301,27 @@ the fact in the messages buffer."
(defvar feedmail-queue-buffer-file-name nil (defvar feedmail-queue-buffer-file-name nil
"If non-nil, has the value normally expected of 'buffer-file-name'. "If non-nil, has the value normally expected of `buffer-file-name'.
You are not intended to set this to something in your configuration. Rather, You are not intended to set this to something in your configuration. Rather,
you might programmatically set it to something via a hook or function you might programmatically set it to something via a hook or function
advice or whatever. You might like to do this if you are using a mail advice or whatever. You might like to do this if you are using a mail
composition program that eventually uses sendmail.el's 'mail-send' composition program that eventually uses sendmail.el's `mail-send'
function to process the message. If there is a filename associated function to process the message. If there is a filename associated
with the message buffer, 'mail-send' will ask you for confirmation. with the message buffer, `mail-send' will ask you for confirmation.
There's no trivial way to avoid it. It's unwise to just set the value There's no trivial way to avoid it. It's unwise to just set the value
of 'buffer-file-name' to nil because that will defeat feedmail's file of `buffer-file-name' to nil because that will defeat feedmail's file
management features. Instead, arrange for this variable to be set to management features. Instead, arrange for this variable to be set to
the value of 'buffer-file-name' before setting that to nil. An easy way the value of `buffer-file-name' before setting that to nil. An easy way
to do that would be with defadvice on 'mail-send' \(undoing the to do that would be with defadvice on `mail-send' \(undoing the
assignments in a later advice\). assignments in a later advice\).
feedmail will pretend that 'buffer-file-name', if nil, has the value feedmail will pretend that `buffer-file-name', if nil, has the value
assigned of 'feedmail-queue-buffer-file-name' and carry out its normal assigned of `feedmail-queue-buffer-file-name' and carry out its normal
activities. feedmail does not restore the non-nil value of activities. feedmail does not restore the non-nil value of
'buffer-file-name'. For safe bookkeeping, the user should insure that `buffer-file-name'. For safe bookkeeping, the user should insure that
feedmail-queue-buffer-file-name is restored to nil. feedmail-queue-buffer-file-name is restored to nil.
Example 'defadvice' for mail-send: Example `defadvice' for mail-send:
(defadvice mail-send (before feedmail-mail-send-before-advice activate) (defadvice mail-send (before feedmail-mail-send-before-advice activate)
(setq feedmail-queue-buffer-file-name buffer-file-name) (setq feedmail-queue-buffer-file-name buffer-file-name)

View file

@ -762,7 +762,7 @@ VALUES may contain values for editable fields from current article."
(define-key map [(d)] 'mairix-select-delete) (define-key map [(d)] 'mairix-select-delete)
(define-key map [(s)] 'mairix-select-save) (define-key map [(s)] 'mairix-select-save)
map) map)
"'mairix-searches-mode' keymap.") "`mairix-searches-mode' keymap.")
(defvar mairix-searches-mode-font-lock-keywords (defvar mairix-searches-mode-font-lock-keywords
'(("^\\([0-9]+\\)" '(("^\\([0-9]+\\)"

View file

@ -235,7 +235,7 @@ which apply for this feed only, overriding the value of
'intern 'intern
"Method for retrieving news from the web, either `intern' or `extern'. "Method for retrieving news from the web, either `intern' or `extern'.
Default value `intern' uses Emacs' built-in asynchronous download Default value `intern' uses Emacs' built-in asynchronous download
capabilities ('url-retrieve'). If set to `extern' the external capabilities (`url-retrieve'). If set to `extern' the external
program wget is used, see `newsticker-wget-name'." program wget is used, see `newsticker-wget-name'."
:type '(choice :tag "Method" :type '(choice :tag "Method"
(const :tag "Intern" intern) (const :tag "Intern" intern)
@ -332,9 +332,9 @@ deleted at the next retrieval."
This is an alist of the form (FEED-NAME PATTERN-LIST). I.e. each This is an alist of the form (FEED-NAME PATTERN-LIST). I.e. each
element consists of a FEED-NAME a PATTERN-LIST. Each element of element consists of a FEED-NAME a PATTERN-LIST. Each element of
the pattern-list has the form (AGE TITLE-OR-DESCRIPTION REGEXP). the pattern-list has the form (AGE TITLE-OR-DESCRIPTION REGEXP).
AGE must be one of the symbols 'old or 'immortal. AGE must be one of the symbols `old' or `immortal'.
TITLE-OR-DESCRIPTION must be on of the symbols 'title, TITLE-OR-DESCRIPTION must be one of the symbols `title',
'description, or 'all. REGEXP is a regular expression, i.e. a `description', or `all'. REGEXP is a regular expression, i.e., a
string. string.
This filter is checked after a new headline has been retrieved. This filter is checked after a new headline has been retrieved.

View file

@ -444,11 +444,11 @@ Major differences between this mode and real vi :
* Extensions * Extensions
- Some standard (or modified) Emacs commands were integrated, such as - Some standard (or modified) Emacs commands were integrated, such as
incremental search, query replace, transpose objects, and keyboard macros. incremental search, query replace, transpose objects, and keyboard macros.
- In command state, ^X links to the 'ctl-x-map', and ESC can be linked to - In command state, ^X links to the `ctl-x-map', and ESC can be linked to
esc-map or set undefined. These can give you the full power of Emacs. esc-map or set undefined. These can give you the full power of Emacs.
- See vi-com-map for those keys that are extensions to standard vi, e.g. - See vi-com-map for those keys that are extensions to standard vi, e.g.
`vi-name-last-change-or-macro', `vi-verify-spelling', `vi-locate-def', `vi-name-last-change-or-macro', `vi-verify-spelling', `vi-locate-def',
`vi-mark-region', and 'vi-quote-words'. Some of them are quite handy. `vi-mark-region', and `vi-quote-words'. Some of them are quite handy.
- Use \\[vi-switch-mode] to switch among different modes quickly. - Use \\[vi-switch-mode] to switch among different modes quickly.
Syntax table and abbrevs while in vi mode remain as they were in Emacs." Syntax table and abbrevs while in vi mode remain as they were in Emacs."

View file

@ -4616,7 +4616,7 @@ comment at the start of cc-engine.el for more info."
(defun c-literal-type (range) (defun c-literal-type (range)
"Convenience function that given the result of `c-literal-limits', "Convenience function that given the result of `c-literal-limits',
returns nil or the type of literal that the range surrounds, one returns nil or the type of literal that the range surrounds, one
of the symbols 'c, 'c++ or 'string. It's much faster than using of the symbols `c', `c++' or `string'. It's much faster than using
`c-in-literal' and is intended to be used when you need both the `c-in-literal' and is intended to be used when you need both the
type of a literal and its limits. type of a literal and its limits.

View file

@ -57,7 +57,7 @@
:group 'cpp) :group 'cpp)
(define-widget 'cpp-face 'lazy (define-widget 'cpp-face 'lazy
"Either a face or the special symbol 'invisible'." "Either a face or the special symbol `invisible'."
:type '(choice (const invisible) (face))) :type '(choice (const invisible) (face)))
(defcustom cpp-known-face 'invisible (defcustom cpp-known-face 'invisible

View file

@ -2015,7 +2015,7 @@ COLLAPSE non-nil means collapse the branch."
(defun ebrowse-electric-list-looper (state condition) (defun ebrowse-electric-list-looper (state condition)
"Prevent cursor from moving beyond the buffer end. "Prevent cursor from moving beyond the buffer end.
Don't let it move into the title lines. Don't let it move into the title lines.
See 'Electric-command-loop' for a description of STATE and CONDITION." See `Electric-command-loop' for a description of STATE and CONDITION."
(cond ((and condition (cond ((and condition
(not (memq (car condition) (not (memq (car condition)
'(buffer-read-only end-of-buffer '(buffer-read-only end-of-buffer

View file

@ -624,7 +624,7 @@ It can be quoted, or be inside a quoted form."
(defun elisp--xref-make-xref (type symbol file &optional summary) (defun elisp--xref-make-xref (type symbol file &optional summary)
"Return an xref for TYPE SYMBOL in FILE. "Return an xref for TYPE SYMBOL in FILE.
TYPE must be a type in 'find-function-regexp-alist' (use nil for TYPE must be a type in `find-function-regexp-alist' (use nil for
'defun). If SUMMARY is non-nil, use it for the summary; 'defun). If SUMMARY is non-nil, use it for the summary;
otherwise build the summary from TYPE and SYMBOL." otherwise build the summary from TYPE and SYMBOL."
(xref-make (or summary (xref-make (or summary

View file

@ -234,9 +234,9 @@ The name of the function or case is included between the braces."
(defcustom pascal-auto-lineup '(all) (defcustom pascal-auto-lineup '(all)
"List of contexts where auto lineup of :'s or ='s should be done. "List of contexts where auto lineup of :'s or ='s should be done.
Elements can be of type: 'paramlist', 'declaration' or 'case', which will Elements can be of type: `paramlist', `declaration' or `case', which will
do auto lineup in parameterlist, declarations or case-statements do auto lineup in parameterlist, declarations or case-statements
respectively. The word 'all' will do all lineups. '(case paramlist) for respectively. The word `all' will do all lineups. '(case paramlist) for
instance will do lineup in case-statements and parameterlist, while '(all) instance will do lineup in case-statements and parameterlist, while '(all)
will do all lineups." will do all lineups."
:type '(set :extra-offset 8 :type '(set :extra-offset 8

View file

@ -116,7 +116,7 @@ This function can be used instead of `widen' in any function used
by the indentation engine to make it respect the value by the indentation engine to make it respect the value
`prog-indentation-context'. `prog-indentation-context'.
This function (like 'widen') is useful inside a This function (like `widen') is useful inside a
`save-restriction' to make the indentation correctly work when `save-restriction' to make the indentation correctly work when
narrowing is in effect." narrowing is in effect."
(let ((chunk (cadr prog-indentation-context))) (let ((chunk (cadr prog-indentation-context)))

View file

@ -346,10 +346,10 @@ wherever possible, since it is slow."
(eval-when-compile (eval-when-compile
(defun verilog-regexp-words (a) (defun verilog-regexp-words (a)
"Call 'regexp-opt' with word delimiters for the words A." "Call `regexp-opt' with word delimiters for the words A."
(concat "\\<" (verilog-regexp-opt a t) "\\>"))) (concat "\\<" (verilog-regexp-opt a t) "\\>")))
(defun verilog-regexp-words (a) (defun verilog-regexp-words (a)
"Call 'regexp-opt' with word delimiters for the words A." "Call `regexp-opt' with word delimiters for the words A."
;; The FAQ references this function, so user LISP sometimes calls it ;; The FAQ references this function, so user LISP sometimes calls it
(concat "\\<" (verilog-regexp-opt a t) "\\>")) (concat "\\<" (verilog-regexp-opt a t) "\\>"))
@ -541,9 +541,9 @@ entry \"Fontify Buffer\"). XEmacs: turn off and on font locking."
(defcustom verilog-auto-lineup 'declarations (defcustom verilog-auto-lineup 'declarations
"Type of statements to lineup across multiple lines. "Type of statements to lineup across multiple lines.
If 'all' is selected, then all line ups described below are done. If `all' is selected, then all line ups described below are done.
If 'declarations', then just declarations are lined up with any If `declarations', then just declarations are lined up with any
preceding declarations, taking into account widths and the like, preceding declarations, taking into account widths and the like,
so or example the code: so or example the code:
reg [31:0] a; reg [31:0] a;
@ -552,7 +552,7 @@ would become
reg [31:0] a; reg [31:0] a;
reg b; reg b;
If 'assignment', then assignments are lined up with any preceding If `assignment', then assignments are lined up with any preceding
assignments, so for example the code assignments, so for example the code
a_long_variable <= b + c; a_long_variable <= b + c;
d = e + f; d = e + f;
@ -1054,7 +1054,7 @@ the MSB or LSB of a signal inside an AUTORESET.
If nil, AUTORESET uses \"0\" as the constant. If nil, AUTORESET uses \"0\" as the constant.
If 'unbased', AUTORESET used the unbased unsized literal \"'0\" If `unbased', AUTORESET used the unbased unsized literal \"'0\"
as the constant. This setting is strongly recommended for as the constant. This setting is strongly recommended for
SystemVerilog designs." SystemVerilog designs."
:type 'boolean :type 'boolean
@ -1070,10 +1070,10 @@ SystemVerilog designs."
(defcustom verilog-auto-arg-format 'packed (defcustom verilog-auto-arg-format 'packed
"Formatting to use for AUTOARG signal names. "Formatting to use for AUTOARG signal names.
If 'packed', then as many inputs and outputs that fit within If `packed', then as many inputs and outputs that fit within
`fill-column' will be put onto one line. `fill-column' will be put onto one line.
If 'single', then a single input or output will be put onto each If `single', then a single input or output will be put onto each
line." line."
:version "25.1" :version "25.1"
:type '(radio (const :tag "Line up Assignments and Declarations" packed) :type '(radio (const :tag "Line up Assignments and Declarations" packed)
@ -1172,7 +1172,7 @@ was used for that port declaration. This setting is suggested
only for debugging use, as regular use may cause a large numbers only for debugging use, as regular use may cause a large numbers
of merge conflicts. of merge conflicts.
If 'lhs', the comment will show the left hand side of the If `lhs', the comment will show the left hand side of the
AUTO_TEMPLATE rule that is matched. This is less precise than AUTO_TEMPLATE rule that is matched. This is less precise than
numbering (t) when multiple rules have the same pin name, but numbering (t) when multiple rules have the same pin name, but
won't merge conflict." won't merge conflict."

View file

@ -220,7 +220,7 @@ Interactively, reads the register using `register-read-with-preview'."
(set-advertised-calling-convention 'frame-configuration-to-register (set-advertised-calling-convention 'frame-configuration-to-register
'(register) "24.4") '(register) "24.4")
(make-obsolete 'frame-configuration-to-register 'frameset-to-register' "24.4") (make-obsolete 'frame-configuration-to-register 'frameset-to-register "24.4")
(defalias 'register-to-point 'jump-to-register) (defalias 'register-to-point 'jump-to-register)
(defun jump-to-register (register &optional delete) (defun jump-to-register (register &optional delete)

View file

@ -2326,7 +2326,7 @@ If the text between BEG and END is equal to a correction suggested by
Ispell, after transposing two adjacent characters, correct the text, Ispell, after transposing two adjacent characters, correct the text,
and return t. and return t.
The third arg POSS is either the symbol 'doublon' or a list of The third arg POSS is either the symbol `doublon' or a list of
possible corrections as returned by `ispell-parse-output'. possible corrections as returned by `ispell-parse-output'.
This function is meant to be added to `flyspell-incorrect-hook'." This function is meant to be added to `flyspell-incorrect-hook'."
@ -2356,7 +2356,7 @@ If the text between BEG and END is equal to a correction suggested by
Ispell, after removing a pair of doubled characters, correct the text, Ispell, after removing a pair of doubled characters, correct the text,
and return t. and return t.
The third arg POSS is either the symbol 'doublon' or a list of The third arg POSS is either the symbol `doublon' or a list of
possible corrections as returned by `ispell-parse-output'. possible corrections as returned by `ispell-parse-output'.
This function is meant to be added to `flyspell-incorrect-hook'." This function is meant to be added to `flyspell-incorrect-hook'."

View file

@ -2806,8 +2806,8 @@ ORIENTATION is a symbol either horizontally or vertically."
;;;###autoload ;;;###autoload
(defun table-justify (what justify) (defun table-justify (what justify)
"Justify contents of a cell, a row of cells or a column of cells. "Justify contents of a cell, a row of cells or a column of cells.
WHAT is a symbol 'cell, 'row or 'column. JUSTIFY is a symbol 'left, WHAT is a symbol cell, row or column. JUSTIFY is a symbol
'center, 'right, 'top, 'middle, 'bottom or 'none." left, center, right, top, middle, bottom or none."
(interactive (interactive
(list (let* ((_ (barf-if-buffer-read-only)) (list (let* ((_ (barf-if-buffer-read-only))
(completion-ignore-case t) (completion-ignore-case t)
@ -2822,8 +2822,8 @@ WHAT is a symbol 'cell, 'row or 'column. JUSTIFY is a symbol 'left,
;;;###autoload ;;;###autoload
(defun table-justify-cell (justify &optional paragraph) (defun table-justify-cell (justify &optional paragraph)
"Justify cell contents. "Justify cell contents.
JUSTIFY is a symbol 'left, 'center or 'right for horizontal, or 'top, JUSTIFY is a symbol left, center or right for horizontal, or top,
'middle, 'bottom or 'none for vertical. When optional PARAGRAPH is middle, bottom or none for vertical. When optional PARAGRAPH is
non-nil the justify operation is limited to the current paragraph, non-nil the justify operation is limited to the current paragraph,
otherwise the entire cell contents is justified." otherwise the entire cell contents is justified."
(interactive (interactive
@ -2835,8 +2835,8 @@ otherwise the entire cell contents is justified."
;;;###autoload ;;;###autoload
(defun table-justify-row (justify) (defun table-justify-row (justify)
"Justify cells of a row. "Justify cells of a row.
JUSTIFY is a symbol 'left, 'center or 'right for horizontal, or top, JUSTIFY is a symbol left, center or right for horizontal,
'middle, 'bottom or 'none for vertical." or top, middle, bottom or none for vertical."
(interactive (interactive
(list (table--query-justification))) (list (table--query-justification)))
(let((cell-list (table--horizontal-cell-list nil nil 'top))) (let((cell-list (table--horizontal-cell-list nil nil 'top)))
@ -2852,8 +2852,8 @@ JUSTIFY is a symbol 'left, 'center or 'right for horizontal, or top,
;;;###autoload ;;;###autoload
(defun table-justify-column (justify) (defun table-justify-column (justify)
"Justify cells of a column. "Justify cells of a column.
JUSTIFY is a symbol 'left, 'center or 'right for horizontal, or top, JUSTIFY is a symbol left, center or right for horizontal,
'middle, 'bottom or 'none for vertical." or top, middle, bottom or none for vertical."
(interactive (interactive
(list (table--query-justification))) (list (table--query-justification)))
(let((cell-list (table--vertical-cell-list nil nil 'left))) (let((cell-list (table--vertical-cell-list nil nil 'left)))
@ -3341,8 +3341,8 @@ INTERVAL is the number of cells to travel between sequence element
insertion which is normally 1. When zero or less is given for insertion which is normally 1. When zero or less is given for
INTERVAL it is interpreted as number of cells per row so that sequence INTERVAL it is interpreted as number of cells per row so that sequence
is placed straight down vertically as long as the table's cell is placed straight down vertically as long as the table's cell
structure is uniform. JUSTIFY is one of the symbol 'left, 'center or structure is uniform. JUSTIFY is a symbol left, center or
'right, that specifies justification of the inserted string. right that specifies justification of the inserted string.
Example: Example:
@ -4461,8 +4461,8 @@ looking at the appearance of the CELL contents."
(defun table--justify-cell-contents (justify &optional paragraph) (defun table--justify-cell-contents (justify &optional paragraph)
"Justify the current cell contents. "Justify the current cell contents.
JUSTIFY is a symbol 'left, 'center or 'right for horizontal, or 'top, JUSTIFY is a symbol left, center or right for horizontal, or top,
'middle, 'bottom or 'none for vertical. When PARAGRAPH is non-nil the middle, bottom or none for vertical. When PARAGRAPH is non-nil the
justify operation is limited to the current paragraph." justify operation is limited to the current paragraph."
(table-with-cache-buffer (table-with-cache-buffer
(let ((beg (point-min)) (let ((beg (point-min))

View file

@ -102,7 +102,7 @@ When it reaches that size (in bytes), a warning is sent."
(or (executable-find "convert") (or (executable-find "convert")
"/usr/X11R6/bin/convert")) "/usr/X11R6/bin/convert"))
"Name of conversion program for thumbnails generation. "Name of conversion program for thumbnails generation.
It must be 'convert'." It must be \"convert\"."
:type 'string :type 'string
:group 'thumbs) :group 'thumbs)

View file

@ -262,12 +262,12 @@ URL is the url you are requesting authorization to. This can be either a
string representing the URL, or the parsed representation returned by string representing the URL, or the parsed representation returned by
`url-generic-parse-url' `url-generic-parse-url'
REALM is the realm at a specific site we are looking for. This should be a REALM is the realm at a specific site we are looking for. This should be a
string specifying the exact realm, or nil or the symbol 'any' to string specifying the exact realm, or nil or the symbol `any' to
specify that the filename portion of the URL should be used as the specify that the filename portion of the URL should be used as the
realm realm
TYPE is the type of authentication to be returned. This is either a string TYPE is the type of authentication to be returned. This is either a string
representing the type (basic, digest, etc), or nil or the symbol 'any' representing the type (basic, digest, etc), or nil or the symbol `any'
to specify that any authentication is acceptable. If requesting 'any' to specify that any authentication is acceptable. If requesting `any'
the strongest matching authentication will be returned. If this is the strongest matching authentication will be returned. If this is
wrong, it's no big deal, the error from the server will specify exactly wrong, it's no big deal, the error from the server will specify exactly
what type of auth to use what type of auth to use

View file

@ -5596,18 +5596,18 @@ windows can get as small as `window-safe-min-height' and
(defun display-buffer-record-window (type window buffer) (defun display-buffer-record-window (type window buffer)
"Record information for window used by `display-buffer'. "Record information for window used by `display-buffer'.
TYPE specifies the type of the calling operation and must be one TYPE specifies the type of the calling operation and must be one
of the symbols 'reuse (when WINDOW existed already and was of the symbols `reuse' (when WINDOW existed already and was
reused for displaying BUFFER), 'window (when WINDOW was created reused for displaying BUFFER), `window' (when WINDOW was created
on an already existing frame), or 'frame (when WINDOW was on an already existing frame), or `frame' (when WINDOW was
created on a new frame). WINDOW is the window used for or created created on a new frame). WINDOW is the window used for or created
by the `display-buffer' routines. BUFFER is the buffer that by the `display-buffer' routines. BUFFER is the buffer that
shall be displayed. shall be displayed.
This function installs or updates the quit-restore parameter of This function installs or updates the quit-restore parameter of
WINDOW. The quit-restore parameter is a list of four elements: WINDOW. The quit-restore parameter is a list of four elements:
The first element is one of the symbols 'window, 'frame, 'same or The first element is one of the symbols `window', `frame', `same' or
'other. The second element is either one of the symbols 'window `other'. The second element is either one of the symbols `window'
or 'frame or a list whose elements are the buffer previously or `frame' or a list whose elements are the buffer previously
shown in the window, that buffer's window start and window point, shown in the window, that buffer's window start and window point,
and the window's height. The third element is the window and the window's height. The third element is the window
selected at the time the parameter was created. The fourth selected at the time the parameter was created. The fourth

View file

@ -326,8 +326,8 @@ URIs, and expanded names will be returned as a cons
If PARSE-NS is an alist, it will be used as the mapping from If PARSE-NS is an alist, it will be used as the mapping from
namespace to URIs instead. namespace to URIs instead.
If it is the symbol 'symbol-qnames, expanded names will be If it is the symbol `symbol-qnames', expanded names will be
returned as a plain symbol 'namespace:foo instead of a cons. returned as a plain symbol `namespace:foo' instead of a cons.
Both features can be combined by providing a cons cell Both features can be combined by providing a cons cell
@ -356,8 +356,8 @@ URIs, and expanded names will be returned as a cons
If PARSE-NS is an alist, it will be used as the mapping from If PARSE-NS is an alist, it will be used as the mapping from
namespace to URIs instead. namespace to URIs instead.
If it is the symbol 'symbol-qnames, expanded names will be If it is the symbol `symbol-qnames', expanded names will be
returned as a plain symbol 'namespace:foo instead of a cons. returned as a plain symbol `namespace:foo' instead of a cons.
Both features can be combined by providing a cons cell Both features can be combined by providing a cons cell

View file

@ -5540,12 +5540,12 @@ This is the same as (default-value 'indicate-buffer-boundaries). */);
DEFVAR_BUFFER_DEFAULTS ("default-fringe-indicator-alist", DEFVAR_BUFFER_DEFAULTS ("default-fringe-indicator-alist",
fringe_indicator_alist, fringe_indicator_alist,
doc: /* Default value of `fringe-indicator-alist' for buffers that don't override it. doc: /* Default value of `fringe-indicator-alist' for buffers that don't override it.
This is the same as (default-value 'fringe-indicator-alist'). */); This is the same as (default-value 'fringe-indicator-alist). */);
DEFVAR_BUFFER_DEFAULTS ("default-fringe-cursor-alist", DEFVAR_BUFFER_DEFAULTS ("default-fringe-cursor-alist",
fringe_cursor_alist, fringe_cursor_alist,
doc: /* Default value of `fringe-cursor-alist' for buffers that don't override it. doc: /* Default value of `fringe-cursor-alist' for buffers that don't override it.
This is the same as (default-value 'fringe-cursor-alist'). */); This is the same as (default-value 'fringe-cursor-alist). */);
DEFVAR_BUFFER_DEFAULTS ("default-scroll-up-aggressively", DEFVAR_BUFFER_DEFAULTS ("default-scroll-up-aggressively",
scroll_up_aggressively, scroll_up_aggressively,

View file

@ -119,9 +119,9 @@ watched for some reason, this function signals a `file-notify-error' error.
FLAGS is a list of conditions to set what will be watched for. It can FLAGS is a list of conditions to set what will be watched for. It can
include the following symbols: include the following symbols:
'watch-mounts' -- watch for mount events `watch-mounts' -- watch for mount events
'send-moved' -- pair 'deleted' and 'created' events caused by file `send-moved' -- pair `deleted' and `created' events caused by file
renames and send a single 'renamed' event instead renames and send a single `renamed' event instead
When any event happens, Emacs will call the CALLBACK function passing When any event happens, Emacs will call the CALLBACK function passing
it a single argument EVENT, which is of the form it a single argument EVENT, which is of the form
@ -132,18 +132,18 @@ DESCRIPTOR is the same object as the one returned by this function.
ACTION is the description of the event. It could be any one of the ACTION is the description of the event. It could be any one of the
following: following:
'changed' -- FILE has changed `changed' -- FILE has changed
'changes-done-hint' -- a hint that this was probably the last change `changes-done-hint' -- a hint that this was probably the last change
in a set of changes in a set of changes
'deleted' -- FILE was deleted `deleted' -- FILE was deleted
'created' -- FILE was created `created' -- FILE was created
'attribute-changed' -- a FILE attribute was changed `attribute-changed' -- a FILE attribute was changed
'pre-unmount' -- the FILE location will soon be unmounted `pre-unmount' -- the FILE location will soon be unmounted
'unmounted' -- the FILE location was unmounted `unmounted' -- the FILE location was unmounted
'moved' -- FILE was moved to FILE1 `moved' -- FILE was moved to FILE1
FILE is the name of the file whose event is being reported. FILE1 FILE is the name of the file whose event is being reported. FILE1
will be reported only in case of the 'moved' event. */) will be reported only in case of the `moved' event. */)
(Lisp_Object file, Lisp_Object flags, Lisp_Object callback) (Lisp_Object file, Lisp_Object flags, Lisp_Object callback)
{ {
Lisp_Object watch_object; Lisp_Object watch_object;