aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuanma Barranquero2019-09-19 04:32:25 +0200
committerJuanma Barranquero2019-09-19 04:32:25 +0200
commit79a01866a01754b9f566af76ef96e80cd90d094b (patch)
treef08a0ba4abd3caca32ad82e582e9327bdc43e569
parent34f1035e878a06ad181ff7fc533cd1fa0a565847 (diff)
downloademacs-79a01866a01754b9f566af76ef96e80cd90d094b.tar.gz
emacs-79a01866a01754b9f566af76ef96e80cd90d094b.zip
lisp/*.el, src/*.c: Fix typos in docstrings
* lisp/apropos.el (apropos-do-all): * lisp/auth-source-pass.el (auth-source-pass--select-from-entries): * lisp/auth-source.el (auth-source-user-or-password): * lisp/calc/calc-forms.el (math-tzone-names): * lisp/calendar/diary-lib.el (diary-face-attrs) (diary-mark-entries-1): * lisp/cedet/cedet-files.el (cedet-files-list-recursively): * lisp/cedet/ede.el (ede-constructing, ede-deep-rescan): * lisp/cedet/ede/cpp-root.el (ede-cpp-root-header-file-p): * lisp/cedet/ede/proj.el (ede-proj-target-makefile): * lisp/cedet/inversion.el (inversion-check-version) (inversion-test): * lisp/cedet/mode-local.el (mode-local-map-file-buffers): * lisp/cedet/semantic/complete.el (semantic-displayer-ghost): * lisp/cedet/semantic/db-find.el (semanticdb-find-translate-path-default): * lisp/cedet/semantic/db.el (semanticdb-table) (semanticdb-search-system-databases): * lisp/cedet/semantic/imenu.el (semantic-imenu-index-directory): * lisp/cedet/semantic/java.el (semantic-java-doc-keywords-map): * lisp/cedet/semantic/lex-spp.el (semantic-lex-spp-use-headers-flag): * lisp/cedet/semantic/lex.el (semantic-lex-make-keyword-table) (semantic-lex-make-type-table, semantic-lex-debug-analyzers): * lisp/cedet/semantic/tag-ls.el (semantic-tag-abstract-p) (semantic-tag-leaf-p, semantic-tag-static-p) (semantic-tag-prototype-p): * lisp/dnd.el (dnd-open-remote-file-function, dnd-open-local-file): * lisp/emacs-lisp/eieio-opt.el (eieio-build-class-alist) (eieio-read-class, eieio-read-subclass): * lisp/emacs-lisp/generator.el (cps--replace-variable-references) (cps--handle-loop-for): * lisp/erc/erc-dcc.el (erc-dcc-list, erc-dcc-member, erc-dcc-server) (erc-dcc-auto-mask-p, erc-dcc-get-file, erc-dcc-chat-accept): * lisp/eshell/em-pred.el (eshell-pred-file-type): * lisp/faces.el (defined-colors-with-face-attributes): * lisp/font-core.el (font-lock-mode): * lisp/frame.el (frame-restack): * lisp/net/shr.el (shr-image-animate): * lisp/org/org-agenda.el (org-agenda-change-all-lines) (org-agenda-today-p): * lisp/org/org-id.el (org-id-get): * lisp/org/org.el (org-highlight-latex-and-related) (org--valid-property-p): * lisp/org/ox-beamer.el (org-beamer--get-label): * lisp/org/ox-latex.el (org-latex--caption-above-p): * lisp/org/ox-odt.el (org-odt--copy-image-file) (org-odt--copy-formula-file): * lisp/org/ox.el (org-export-with-timestamps): * lisp/progmodes/verilog-mode.el (verilog-indent-declaration-macros): * lisp/ses.el (ses-file-format-extend-parameter-list): * lisp/term.el (ansi-term): * lisp/textmodes/bibtex.el (bibtex-no-opt-remove-re) (bibtex-beginning-of-first-entry, bibtex-autokey-get-title) (bibtex-read-key, bibtex-initialize): * lisp/textmodes/flyspell.el (flyspell-word): * lisp/view.el (view-mode-exit): * src/composite.c: * src/floatfns.c (Fisnan): Fix typos in docstrings.
-rw-r--r--lisp/apropos.el2
-rw-r--r--lisp/auth-source-pass.el2
-rw-r--r--lisp/auth-source.el6
-rw-r--r--lisp/calc/calc-forms.el2
-rw-r--r--lisp/calendar/diary-lib.el4
-rw-r--r--lisp/cedet/cedet-files.el2
-rw-r--r--lisp/cedet/ede.el4
-rw-r--r--lisp/cedet/ede/cpp-root.el2
-rw-r--r--lisp/cedet/ede/proj.el2
-rw-r--r--lisp/cedet/inversion.el6
-rw-r--r--lisp/cedet/mode-local.el2
-rw-r--r--lisp/cedet/semantic/complete.el2
-rw-r--r--lisp/cedet/semantic/db-find.el2
-rw-r--r--lisp/cedet/semantic/db.el4
-rw-r--r--lisp/cedet/semantic/imenu.el2
-rw-r--r--lisp/cedet/semantic/java.el2
-rw-r--r--lisp/cedet/semantic/lex-spp.el2
-rw-r--r--lisp/cedet/semantic/lex.el6
-rw-r--r--lisp/cedet/semantic/tag-ls.el8
-rw-r--r--lisp/cedet/semantic/wisent.el2
-rw-r--r--lisp/dnd.el8
-rw-r--r--lisp/emacs-lisp/eieio-opt.el6
-rw-r--r--lisp/emacs-lisp/generator.el4
-rw-r--r--lisp/erc/erc-dcc.el22
-rw-r--r--lisp/eshell/em-pred.el2
-rw-r--r--lisp/faces.el2
-rw-r--r--lisp/font-core.el2
-rw-r--r--lisp/frame.el2
-rw-r--r--lisp/international/kkc.el2
-rw-r--r--lisp/net/shr.el2
-rw-r--r--lisp/org/org-agenda.el4
-rw-r--r--lisp/org/org-id.el2
-rw-r--r--lisp/org/org.el4
-rw-r--r--lisp/org/ox-beamer.el2
-rw-r--r--lisp/org/ox-latex.el2
-rw-r--r--lisp/org/ox-odt.el4
-rw-r--r--lisp/org/ox.el2
-rw-r--r--lisp/progmodes/cc-mode.el2
-rw-r--r--lisp/progmodes/etags.el2
-rw-r--r--lisp/progmodes/verilog-mode.el2
-rw-r--r--lisp/ses.el2
-rw-r--r--lisp/term.el2
-rw-r--r--lisp/textmodes/bibtex.el10
-rw-r--r--lisp/textmodes/flyspell.el2
-rw-r--r--lisp/view.el2
-rw-r--r--src/composite.c2
-rw-r--r--src/floatfns.c2
47 files changed, 82 insertions, 82 deletions
diff --git a/lisp/apropos.el b/lisp/apropos.el
index 79e5a1518fe..da6cf867b4f 100644
--- a/lisp/apropos.el
+++ b/lisp/apropos.el
@@ -66,7 +66,7 @@
66 66
67;; I see a degradation of maybe 10-20% only. 67;; I see a degradation of maybe 10-20% only.
68(defcustom apropos-do-all nil 68(defcustom apropos-do-all nil
69 "Non nil means apropos commands will search more extensively. 69 "Non-nil means apropos commands will search more extensively.
70This may be slower. This option affects the following commands: 70This may be slower. This option affects the following commands:
71 71
72`apropos-user-option' will search all variables, not just user options. 72`apropos-user-option' will search all variables, not just user options.
diff --git a/lisp/auth-source-pass.el b/lisp/auth-source-pass.el
index f16d9108903..c45c782c27c 100644
--- a/lisp/auth-source-pass.el
+++ b/lisp/auth-source-pass.el
@@ -243,7 +243,7 @@ HOSTNAME should not contain any username or port number."
243(defun auth-source-pass--select-from-entries (entries user) 243(defun auth-source-pass--select-from-entries (entries user)
244 "Return best matching password-store entry data from ENTRIES. 244 "Return best matching password-store entry data from ENTRIES.
245 245
246If USER is non nil, give precedence to entries containing a user field 246If USER is non-nil, give precedence to entries containing a user field
247matching USER." 247matching USER."
248 (let (fallback) 248 (let (fallback)
249 (catch 'auth-source-pass-break 249 (catch 'auth-source-pass-break
diff --git a/lisp/auth-source.el b/lisp/auth-source.el
index 74c44916992..7d8657da110 100644
--- a/lisp/auth-source.el
+++ b/lisp/auth-source.el
@@ -2259,12 +2259,12 @@ items don't have a username. This means that if you search for
2259username \"joe\" and it matches an item but the item doesn't have 2259username \"joe\" and it matches an item but the item doesn't have
2260a :user attribute, the username \"joe\" will be returned. 2260a :user attribute, the username \"joe\" will be returned.
2261 2261
2262A non nil DELETE-EXISTING means deleting any matching password 2262A non-nil DELETE-EXISTING means deleting any matching password
2263entry in the respective sources. This is useful only when 2263entry in the respective sources. This is useful only when
2264CREATE-MISSING is non nil as well; the intended use case is to 2264CREATE-MISSING is non-nil as well; the intended use case is to
2265remove wrong password entries. 2265remove wrong password entries.
2266 2266
2267If no matching entry is found, and CREATE-MISSING is non nil, 2267If no matching entry is found, and CREATE-MISSING is non-nil,
2268the password will be retrieved interactively, and it will be 2268the password will be retrieved interactively, and it will be
2269stored in the password database which matches best (see 2269stored in the password database which matches best (see
2270`auth-sources'). 2270`auth-sources').
diff --git a/lisp/calc/calc-forms.el b/lisp/calc/calc-forms.el
index 7e8a8dcc9d0..98dcfab015a 100644
--- a/lisp/calc/calc-forms.el
+++ b/lisp/calc/calc-forms.el
@@ -1462,7 +1462,7 @@ as measured in the integer number of days before December 31, 1 BC (Gregorian)."
1462 ( "PGT" 8 "PST" "PDT" ) ( "PST" 8 0 ) ( "PDT" 8 -1 ) ; Pacific 1462 ( "PGT" 8 "PST" "PDT" ) ( "PST" 8 0 ) ( "PDT" 8 -1 ) ; Pacific
1463 ( "YGT" 9 "YST" "YDT" ) ( "YST" 9 0 ) ( "YDT" 9 -1 ) ; Yukon 1463 ( "YGT" 9 "YST" "YDT" ) ( "YST" 9 0 ) ( "YDT" 9 -1 ) ; Yukon
1464 ) 1464 )
1465 "No doc yet. See calc manual for now. ") 1465 "No doc yet. See calc manual for now.")
1466 1466
1467(defvar var-TimeZone nil) 1467(defvar var-TimeZone nil)
1468 1468
diff --git a/lisp/calendar/diary-lib.el b/lisp/calendar/diary-lib.el
index 06f1161b44a..5a2374a5957 100644
--- a/lisp/calendar/diary-lib.el
+++ b/lisp/calendar/diary-lib.el
@@ -97,7 +97,7 @@ is pre-pended to REGEXP for file-wide specifiers. ATTRIBUTE
97specifies which face attribute (e.g. `:foreground') to modify, or 97specifies which face attribute (e.g. `:foreground') to modify, or
98that this is a face (`:face') to apply. TYPE is the type of 98that this is a face (`:face') to apply. TYPE is the type of
99attribute being applied. Available TYPES (see `diary-attrtype-convert') 99attribute being applied. Available TYPES (see `diary-attrtype-convert')
100are: `string', `symbol', `int', `tnil', `stringtnil.'" 100are: `string', `symbol', `int', `tnil', `stringtnil'."
101 :type '(repeat (list (string :tag "Regular expression") 101 :type '(repeat (list (string :tag "Regular expression")
102 (integer :tag "Sub-expression") 102 (integer :tag "Sub-expression")
103 (symbol :tag "Attribute (e.g. :foreground)") 103 (symbol :tag "Attribute (e.g. :foreground)")
@@ -1257,7 +1257,7 @@ the regexp with parentheses."
1257MARKFUNC is a function that marks entries of the appropriate type 1257MARKFUNC is a function that marks entries of the appropriate type
1258matching a given date pattern. MONTHS is an array of month names. 1258matching a given date pattern. MONTHS is an array of month names.
1259SYMBOL marks diary entries of the type in question. ABSFUNC is a 1259SYMBOL marks diary entries of the type in question. ABSFUNC is a
1260function that converts absolute dates to dates of the appropriate type. " 1260function that converts absolute dates to dates of the appropriate type."
1261 (calendar-dlet* 1261 (calendar-dlet*
1262 ((dayname (diary-name-pattern calendar-day-name-array 1262 ((dayname (diary-name-pattern calendar-day-name-array
1263 calendar-day-abbrev-array)) 1263 calendar-day-abbrev-array))
diff --git a/lisp/cedet/cedet-files.el b/lisp/cedet/cedet-files.el
index d3becd5c845..7329eb37f7f 100644
--- a/lisp/cedet/cedet-files.el
+++ b/lisp/cedet/cedet-files.el
@@ -89,7 +89,7 @@ specific conversions during tests."
89 file)) 89 file))
90 90
91(defun cedet-files-list-recursively (dir re) 91(defun cedet-files-list-recursively (dir re)
92 "Returns list of files in directory matching to given regex" 92 "Return list of files in directory matching to given regex."
93 (when (file-accessible-directory-p dir) 93 (when (file-accessible-directory-p dir)
94 (let ((files (directory-files dir t)) 94 (let ((files (directory-files dir t))
95 matched) 95 matched)
diff --git a/lisp/cedet/ede.el b/lisp/cedet/ede.el
index d051510a994..1969df54cde 100644
--- a/lisp/cedet/ede.el
+++ b/lisp/cedet/ede.el
@@ -162,12 +162,12 @@ This object's class determines how to compile and debug from a buffer.")
162If `ede-object' is nil, then commands will operate on this object.") 162If `ede-object' is nil, then commands will operate on this object.")
163 163
164(defvar ede-constructing nil 164(defvar ede-constructing nil
165 "Non nil when constructing a project hierarchy. 165 "Non-nil when constructing a project hierarchy.
166If the project is being constructed from an autoload, then the 166If the project is being constructed from an autoload, then the
167value is the autoload object being used.") 167value is the autoload object being used.")
168 168
169(defvar ede-deep-rescan nil 169(defvar ede-deep-rescan nil
170 "Non nil means scan down a tree, otherwise rescans are top level only. 170 "Non-nil means scan down a tree, otherwise rescans are top level only.
171Do not set this to non-nil globally. It is used internally.") 171Do not set this to non-nil globally. It is used internally.")
172 172
173 173
diff --git a/lisp/cedet/ede/cpp-root.el b/lisp/cedet/ede/cpp-root.el
index 0a77692dd71..feff63681a8 100644
--- a/lisp/cedet/ede/cpp-root.el
+++ b/lisp/cedet/ede/cpp-root.el
@@ -389,7 +389,7 @@ This knows details about or source tree."
389;; include lists, and Preprocessor symbol tables. 389;; include lists, and Preprocessor symbol tables.
390 390
391(cl-defmethod ede-cpp-root-header-file-p ((proj ede-cpp-root-project) name) 391(cl-defmethod ede-cpp-root-header-file-p ((proj ede-cpp-root-project) name)
392 "Non nil if in PROJ the filename NAME is a header." 392 "Non-nil if in PROJ the filename NAME is a header."
393 (save-match-data 393 (save-match-data
394 (string-match (oref proj header-match-regexp) name))) 394 (string-match (oref proj header-match-regexp) name)))
395 395
diff --git a/lisp/cedet/ede/proj.el b/lisp/cedet/ede/proj.el
index 59ba3ffcf8c..2ce65e91bde 100644
--- a/lisp/cedet/ede/proj.el
+++ b/lisp/cedet/ede/proj.el
@@ -165,7 +165,7 @@ These are the linkers the user can choose from when setting the
165 :label "Part of all: target" 165 :label "Part of all: target"
166 :group make 166 :group make
167 :documentation 167 :documentation
168 "Non nil means the rule created is part of the all: target. 168 "Non-nil means the rule created is part of the all: target.
169Setting this to nil creates the rule to build this item, but does not 169Setting this to nil creates the rule to build this item, but does not
170include it in the all: rule.") 170include it in the all: rule.")
171 (configuration-variables 171 (configuration-variables
diff --git a/lisp/cedet/inversion.el b/lisp/cedet/inversion.el
index 3bed9d70534..83561a0dfa7 100644
--- a/lisp/cedet/inversion.el
+++ b/lisp/cedet/inversion.el
@@ -226,7 +226,7 @@ not an indication of new features or bug fixes."
226 "Check that a given version meets the minimum requirement. 226 "Check that a given version meets the minimum requirement.
227VERSION, INCOMPATIBLE-VERSION and MINIMUM are of similar format to 227VERSION, INCOMPATIBLE-VERSION and MINIMUM are of similar format to
228return entries of `inversion-decode-version', or a classic version 228return entries of `inversion-decode-version', or a classic version
229string. INCOMPATIBLE-VERSION can be nil. 229string. INCOMPATIBLE-VERSION can be nil.
230RESERVED arguments are kept for a later use. 230RESERVED arguments are kept for a later use.
231Return: 231Return:
232- nil if everything is ok. 232- nil if everything is ok.
@@ -274,7 +274,7 @@ MINIMUM is of similar format to return entries of
274RESERVED arguments are kept for a later user. 274RESERVED arguments are kept for a later user.
275This depends on the symbols `PACKAGE-version' and optionally 275This depends on the symbols `PACKAGE-version' and optionally
276`PACKAGE-incompatible-version' being defined in PACKAGE. 276`PACKAGE-incompatible-version' being defined in PACKAGE.
277Return nil if everything is ok. Return an error string otherwise." 277Return nil if everything is ok. Return an error string otherwise."
278 (let ((check (inversion-check-version 278 (let ((check (inversion-check-version
279 (inversion-package-version package) 279 (inversion-package-version package)
280 (inversion-package-incompatibility-version package) 280 (inversion-package-incompatibility-version package)
@@ -306,7 +306,7 @@ OLDVERSION is of similar format to return entries of
306RESERVED arguments are kept for a later user. 306RESERVED arguments are kept for a later user.
307This depends on the symbols `PACKAGE-version' and optionally 307This depends on the symbols `PACKAGE-version' and optionally
308`PACKAGE-incompatible-version' being defined in PACKAGE. 308`PACKAGE-incompatible-version' being defined in PACKAGE.
309Return nil if everything is ok. Return an error string otherwise." 309Return nil if everything is ok. Return an error string otherwise."
310 (let ((check (inversion-check-version 310 (let ((check (inversion-check-version
311 (inversion-package-version package) 311 (inversion-package-version package)
312 (inversion-package-incompatibility-version package) 312 (inversion-package-incompatibility-version package)
diff --git a/lisp/cedet/mode-local.el b/lisp/cedet/mode-local.el
index 3d2fe45fcb1..50dc3cb7937 100644
--- a/lisp/cedet/mode-local.el
+++ b/lisp/cedet/mode-local.el
@@ -58,7 +58,7 @@
58 "Run FUNCTION on every file buffer found. 58 "Run FUNCTION on every file buffer found.
59FUNCTION does not have arguments; when it is entered `current-buffer' 59FUNCTION does not have arguments; when it is entered `current-buffer'
60is the currently selected file buffer. 60is the currently selected file buffer.
61If optional argument PREDICATE is non nil, only select file buffers 61If optional argument PREDICATE is non-nil, only select file buffers
62for which the function PREDICATE returns non-nil. 62for which the function PREDICATE returns non-nil.
63If optional argument BUFFERS is non-nil, it is a list of buffers to 63If optional argument BUFFERS is non-nil, it is a list of buffers to
64walk through. It defaults to `buffer-list'." 64walk through. It defaults to `buffer-list'."
diff --git a/lisp/cedet/semantic/complete.el b/lisp/cedet/semantic/complete.el
index b438a1c6e22..8f89d1a51e2 100644
--- a/lisp/cedet/semantic/complete.el
+++ b/lisp/cedet/semantic/complete.el
@@ -1800,7 +1800,7 @@ Return a cons cell (X . Y)"
1800 "The overlay the ghost text is displayed in.") 1800 "The overlay the ghost text is displayed in.")
1801 (first-show :initform t 1801 (first-show :initform t
1802 :documentation 1802 :documentation
1803 "Non nil if we have not seen our first show request.") 1803 "Non-nil if we have not seen our first show request.")
1804 ) 1804 )
1805 "Cycle completions inline with ghost text. 1805 "Cycle completions inline with ghost text.
1806Completion displayer using ghost chars after point for focus options. 1806Completion displayer using ghost chars after point for focus options.
diff --git a/lisp/cedet/semantic/db-find.el b/lisp/cedet/semantic/db-find.el
index 54935c3a7c7..18c749b098e 100644
--- a/lisp/cedet/semantic/db-find.el
+++ b/lisp/cedet/semantic/db-find.el
@@ -304,7 +304,7 @@ so that it can be called from the idle work handler."
304 304
305(defun semanticdb-find-translate-path-default (path brutish) 305(defun semanticdb-find-translate-path-default (path brutish)
306 "Translate PATH into a list of semantic tables. 306 "Translate PATH into a list of semantic tables.
307If BRUTISH is non nil, return all tables associated with PATH. 307If BRUTISH is non-nil, return all tables associated with PATH.
308Default action as described in `semanticdb-find-translate-path'." 308Default action as described in `semanticdb-find-translate-path'."
309 (if (semanticdb-find-results-p path) 309 (if (semanticdb-find-results-p path)
310 ;; nil means perform the search over these results. 310 ;; nil means perform the search over these results.
diff --git a/lisp/cedet/semantic/db.el b/lisp/cedet/semantic/db.el
index 33ad4701769..5c7f8423839 100644
--- a/lisp/cedet/semantic/db.el
+++ b/lisp/cedet/semantic/db.el
@@ -238,7 +238,7 @@ If nil, the table's buffer is no in Emacs. If it has a value, then
238it is in Emacs.") 238it is in Emacs.")
239 (dirty :initform nil 239 (dirty :initform nil
240 :documentation 240 :documentation
241 "Non nil if this table needs to be `Saved'.") 241 "Non-nil if this table needs to be `Saved'.")
242 (db-refs :initform nil 242 (db-refs :initform nil
243 :documentation 243 :documentation
244 "List of `semanticdb-table' objects referring to this one. 244 "List of `semanticdb-table' objects referring to this one.
@@ -833,7 +833,7 @@ value.")
833(make-variable-buffer-local 'semanticdb-project-system-databases) 833(make-variable-buffer-local 'semanticdb-project-system-databases)
834 834
835(defvar semanticdb-search-system-databases t 835(defvar semanticdb-search-system-databases t
836 "Non nil if search routines are to include a system database.") 836 "Non-nil if search routines are to include a system database.")
837 837
838(defun semanticdb-current-database-list (&optional dir) 838(defun semanticdb-current-database-list (&optional dir)
839 "Return a list of databases associated with the current buffer. 839 "Return a list of databases associated with the current buffer.
diff --git a/lisp/cedet/semantic/imenu.el b/lisp/cedet/semantic/imenu.el
index 009d04dbd75..5119eb62f3d 100644
--- a/lisp/cedet/semantic/imenu.el
+++ b/lisp/cedet/semantic/imenu.el
@@ -119,7 +119,7 @@ See `semantic-bucketize' and the FILTER argument for more details on this functi
119(make-variable-buffer-local 'semantic-imenu-sort-bucket-function) 119(make-variable-buffer-local 'semantic-imenu-sort-bucket-function)
120 120
121(defcustom semantic-imenu-index-directory nil 121(defcustom semantic-imenu-index-directory nil
122 "Non nil to index the entire directory for tags. 122 "Non-nil to index the entire directory for tags.
123Doesn't actually parse the entire directory, but displays tags for all files 123Doesn't actually parse the entire directory, but displays tags for all files
124currently listed in the current Semantic database. 124currently listed in the current Semantic database.
125This variable has no meaning if semanticdb is not active." 125This variable has no meaning if semanticdb is not active."
diff --git a/lisp/cedet/semantic/java.el b/lisp/cedet/semantic/java.el
index 7f9c93b906f..b103c3ce157 100644
--- a/lisp/cedet/semantic/java.el
+++ b/lisp/cedet/semantic/java.el
@@ -391,7 +391,7 @@ That is TAG `symbol-name' without the leading `@'."
391 391
392(defun semantic-java-doc-keywords-map (fun &optional property) 392(defun semantic-java-doc-keywords-map (fun &optional property)
393 "Run function FUN for each javadoc keyword. 393 "Run function FUN for each javadoc keyword.
394Return the list of FUN results. If optional PROPERTY is non nil only 394Return the list of FUN results. If optional PROPERTY is non-nil only
395call FUN for javadoc keywords which have a value for PROPERTY. FUN 395call FUN for javadoc keywords which have a value for PROPERTY. FUN
396receives two arguments: the javadoc keyword and its associated 396receives two arguments: the javadoc keyword and its associated
397'javadoc property list. It can return any value. All nil values are 397'javadoc property list. It can return any value. All nil values are
diff --git a/lisp/cedet/semantic/lex-spp.el b/lisp/cedet/semantic/lex-spp.el
index 6fe33f93110..d07dc806a48 100644
--- a/lisp/cedet/semantic/lex-spp.el
+++ b/lisp/cedet/semantic/lex-spp.el
@@ -1244,7 +1244,7 @@ For languages that use the Semantic pre-processor, this can
1244improve the accuracy of parsed files where include files 1244improve the accuracy of parsed files where include files
1245can change the state of what's parsed in the current file. 1245can change the state of what's parsed in the current file.
1246 1246
1247Note: Note implemented yet" 1247Note: Not implemented yet."
1248 :group 'semantic 1248 :group 'semantic
1249 :type 'boolean) 1249 :type 'boolean)
1250 1250
diff --git a/lisp/cedet/semantic/lex.el b/lisp/cedet/semantic/lex.el
index a6ee869c037..50e09e2359c 100644
--- a/lisp/cedet/semantic/lex.el
+++ b/lisp/cedet/semantic/lex.el
@@ -256,7 +256,7 @@ SPECS must be a list of (NAME . TOKSYM) elements, where:
256 NAME is the name of the keyword symbol to define. 256 NAME is the name of the keyword symbol to define.
257 TOKSYM is the lexical token symbol of that keyword. 257 TOKSYM is the lexical token symbol of that keyword.
258 258
259If optional argument PROPSPECS is non nil, then interpret it, and 259If optional argument PROPSPECS is non-nil, then interpret it, and
260apply those properties. 260apply those properties.
261PROPSPECS must be a list of (NAME PROPERTY VALUE) elements." 261PROPSPECS must be a list of (NAME PROPERTY VALUE) elements."
262 ;; Create the symbol hash table 262 ;; Create the symbol hash table
@@ -414,7 +414,7 @@ SPECS must be a list of (TYPE . TOKENS) elements, where:
414 MATCHER is a string or regexp a text must match to be a such 414 MATCHER is a string or regexp a text must match to be a such
415 lexical token. 415 lexical token.
416 416
417If optional argument PROPSPECS is non nil, then interpret it, and 417If optional argument PROPSPECS is non-nil, then interpret it, and
418apply those properties. 418apply those properties.
419PROPSPECS must be a list of (TYPE PROPERTY VALUE)." 419PROPSPECS must be a list of (TYPE PROPERTY VALUE)."
420 ;; Create the symbol hash table 420 ;; Create the symbol hash table
@@ -1060,7 +1060,7 @@ The collapsed tokens are saved in `semantic-lex-block-streams'."
1060;; to create new lexical analyzers. 1060;; to create new lexical analyzers.
1061 1061
1062(defcustom semantic-lex-debug-analyzers nil 1062(defcustom semantic-lex-debug-analyzers nil
1063 "Non nil means to debug analyzers with syntax protection. 1063 "Non-nil means to debug analyzers with syntax protection.
1064Only in effect if `debug-on-error' is also non-nil." 1064Only in effect if `debug-on-error' is also non-nil."
1065 :group 'semantic 1065 :group 'semantic
1066 :type 'boolean) 1066 :type 'boolean)
diff --git a/lisp/cedet/semantic/tag-ls.el b/lisp/cedet/semantic/tag-ls.el
index e4627d69ebd..ad072a40960 100644
--- a/lisp/cedet/semantic/tag-ls.el
+++ b/lisp/cedet/semantic/tag-ls.el
@@ -369,7 +369,7 @@ For these PROTECTIONs, true is returned if TAG is:
369 )) 369 ))
370 370
371(define-overloadable-function semantic-tag-abstract-p (tag &optional parent) 371(define-overloadable-function semantic-tag-abstract-p (tag &optional parent)
372 "Return non nil if TAG is abstract. 372 "Return non-nil if TAG is abstract.
373Optional PARENT is the parent tag of TAG. 373Optional PARENT is the parent tag of TAG.
374In UML, abstract methods and classes have special meaning and behavior 374In UML, abstract methods and classes have special meaning and behavior
375in how methods are overridden. In UML, abstract methods are italicized. 375in how methods are overridden. In UML, abstract methods are italicized.
@@ -393,7 +393,7 @@ See `semantic-tag-abstract-p'."
393 abs)) 393 abs))
394 394
395(define-overloadable-function semantic-tag-leaf-p (tag &optional parent) 395(define-overloadable-function semantic-tag-leaf-p (tag &optional parent)
396 "Return non nil if TAG is leaf. 396 "Return non-nil if TAG is leaf.
397Optional PARENT is the parent tag of TAG. 397Optional PARENT is the parent tag of TAG.
398In UML, leaf methods and classes have special meaning and behavior. 398In UML, leaf methods and classes have special meaning and behavior.
399 399
@@ -417,7 +417,7 @@ See `semantic-tag-leaf-p'."
417 leaf)) 417 leaf))
418 418
419(define-overloadable-function semantic-tag-static-p (tag &optional parent) 419(define-overloadable-function semantic-tag-static-p (tag &optional parent)
420 "Return non nil if TAG is static. 420 "Return non-nil if TAG is static.
421Optional PARENT is the parent tag of TAG. 421Optional PARENT is the parent tag of TAG.
422In UML, static methods and attributes mean that they are allocated 422In UML, static methods and attributes mean that they are allocated
423in the parent class, and are not instance specific. 423in the parent class, and are not instance specific.
@@ -436,7 +436,7 @@ See `semantic-tag-static-p'."
436 436
437;;;###autoload 437;;;###autoload
438(define-overloadable-function semantic-tag-prototype-p (tag) 438(define-overloadable-function semantic-tag-prototype-p (tag)
439 "Return non nil if TAG is a prototype. 439 "Return non-nil if TAG is a prototype.
440For some languages, such as C, a prototype is a declaration of 440For some languages, such as C, a prototype is a declaration of
441something without an implementation." 441something without an implementation."
442 ) 442 )
diff --git a/lisp/cedet/semantic/wisent.el b/lisp/cedet/semantic/wisent.el
index 122b5d399c0..4a759531e46 100644
--- a/lisp/cedet/semantic/wisent.el
+++ b/lisp/cedet/semantic/wisent.el
@@ -184,7 +184,7 @@ the standard function `semantic-parse-stream'."
184 ;; lookahead tokens and tokens in STREAM can be different the 184 ;; lookahead tokens and tokens in STREAM can be different the
185 ;; lookahead token is put in the variable `wisent-lex-lookahead' 185 ;; lookahead token is put in the variable `wisent-lex-lookahead'
186 ;; before calling `wisent-parse'. Wisent's lexers always pop the 186 ;; before calling `wisent-parse'. Wisent's lexers always pop the
187 ;; next lexical token from that variable when non nil, then from 187 ;; next lexical token from that variable when non-nil, then from
188 ;; the lexical input stream. 188 ;; the lexical input stream.
189 ;; 189 ;;
190 ;; The first element of STREAM is used to keep lookahead tokens 190 ;; The first element of STREAM is used to keep lookahead tokens
diff --git a/lisp/dnd.el b/lisp/dnd.el
index 973af7e518b..1599543c3ed 100644
--- a/lisp/dnd.el
+++ b/lisp/dnd.el
@@ -63,12 +63,12 @@ if some action was made, or nil if the URL is ignored."
63 'dnd-open-local-file 63 'dnd-open-local-file
64 'dnd-open-remote-url) 64 'dnd-open-remote-url)
65 "The function to call when opening a file on a remote machine. 65 "The function to call when opening a file on a remote machine.
66The function will be called with two arguments; URI and ACTION. See 66The function will be called with two arguments, URI and ACTION.
67`dnd-open-file' for details. 67See `dnd-open-file' for details.
68If nil, then dragging remote files into Emacs will result in an error. 68If nil, then dragging remote files into Emacs will result in an error.
69Predefined functions are `dnd-open-local-file' and `dnd-open-remote-url'. 69Predefined functions are `dnd-open-local-file' and `dnd-open-remote-url'.
70`dnd-open-local-file' attempts to open a remote file using its UNC name and 70`dnd-open-local-file' attempts to open a remote file using its UNC name and
71is the default on MS-Windows. `dnd-open-remote-url' uses `url-handler-mode' 71is the default on MS-Windows. `dnd-open-remote-url' uses `url-handler-mode'
72and is the default except for MS-Windows." 72and is the default except for MS-Windows."
73 :version "22.1" 73 :version "22.1"
74 :type 'function 74 :type 'function
@@ -174,7 +174,7 @@ The last / in file:/// is part of the file name. If the system
174natively supports unc file names, then remote urls of the form 174natively supports unc file names, then remote urls of the form
175file://server-name/file-name will also be handled by this function. 175file://server-name/file-name will also be handled by this function.
176An alternative for systems that do not support unc file names is 176An alternative for systems that do not support unc file names is
177`dnd-open-remote-url'. ACTION is ignored." 177`dnd-open-remote-url'. ACTION is ignored."
178 178
179 (let* ((f (dnd-get-local-file-name uri t))) 179 (let* ((f (dnd-get-local-file-name uri t)))
180 (if (and f (file-readable-p f)) 180 (if (and f (file-readable-p f))
diff --git a/lisp/emacs-lisp/eieio-opt.el b/lisp/emacs-lisp/eieio-opt.el
index f08c1de936b..fdbf05b3993 100644
--- a/lisp/emacs-lisp/eieio-opt.el
+++ b/lisp/emacs-lisp/eieio-opt.el
@@ -86,7 +86,7 @@ Argument CH-PREFIX is another character prefix to display."
86(defun eieio-build-class-alist (&optional class instantiable-only buildlist) 86(defun eieio-build-class-alist (&optional class instantiable-only buildlist)
87 "Return an alist of all currently active classes for completion purposes. 87 "Return an alist of all currently active classes for completion purposes.
88Optional argument CLASS is the class to start with. 88Optional argument CLASS is the class to start with.
89If INSTANTIABLE-ONLY is non nil, only allow names of classes which 89If INSTANTIABLE-ONLY is non-nil, only allow names of classes which
90are not abstract, otherwise allow all classes. 90are not abstract, otherwise allow all classes.
91Optional argument BUILDLIST is more list to attach and is used internally." 91Optional argument BUILDLIST is more list to attach and is used internally."
92 (let* ((cc (or class 'eieio-default-superclass)) 92 (let* ((cc (or class 'eieio-default-superclass))
@@ -107,7 +107,7 @@ Optional argument BUILDLIST is more list to attach and is used internally."
107(defun eieio-read-class (prompt &optional histvar instantiable-only) 107(defun eieio-read-class (prompt &optional histvar instantiable-only)
108 "Return a class chosen by the user using PROMPT. 108 "Return a class chosen by the user using PROMPT.
109Optional argument HISTVAR is a variable to use as history. 109Optional argument HISTVAR is a variable to use as history.
110If INSTANTIABLE-ONLY is non nil, only allow names of classes which 110If INSTANTIABLE-ONLY is non-nil, only allow names of classes which
111are not abstract." 111are not abstract."
112 (intern (completing-read prompt (eieio-build-class-alist nil instantiable-only) 112 (intern (completing-read prompt (eieio-build-class-alist nil instantiable-only)
113 nil t nil 113 nil t nil
@@ -117,7 +117,7 @@ are not abstract."
117 "Return a class chosen by the user using PROMPT. 117 "Return a class chosen by the user using PROMPT.
118CLASS is the base class, and completion occurs across all subclasses. 118CLASS is the base class, and completion occurs across all subclasses.
119Optional argument HISTVAR is a variable to use as history. 119Optional argument HISTVAR is a variable to use as history.
120If INSTANTIABLE-ONLY is non nil, only allow names of classes which 120If INSTANTIABLE-ONLY is non-nil, only allow names of classes which
121are not abstract." 121are not abstract."
122 (intern (completing-read prompt 122 (intern (completing-read prompt
123 (eieio-build-class-alist class instantiable-only) 123 (eieio-build-class-alist class instantiable-only)
diff --git a/lisp/emacs-lisp/generator.el b/lisp/emacs-lisp/generator.el
index caf5fed154b..dd709b32b09 100644
--- a/lisp/emacs-lisp/generator.el
+++ b/lisp/emacs-lisp/generator.el
@@ -541,7 +541,7 @@ don't yield.")
541 541
542(defun cps--replace-variable-references (var new-var form) 542(defun cps--replace-variable-references (var new-var form)
543 "Replace all non-shadowed references to VAR with NEW-VAR in FORM. 543 "Replace all non-shadowed references to VAR with NEW-VAR in FORM.
544This routine does not modify FORM. Instead, it returns a 544This routine does not modify FORM. Instead, it returns a
545modified copy." 545modified copy."
546 (macroexpand-all 546 (macroexpand-all
547 `(cl-symbol-macrolet ((,var ,new-var)) ,form) 547 `(cl-symbol-macrolet ((,var ,new-var)) ,form)
@@ -760,7 +760,7 @@ Return the value with which ITERATOR finished iteration."
760 (cps--advance-for ,cs)))) 760 (cps--advance-for ,cs))))
761 761
762(defun cps--handle-loop-for (var) 762(defun cps--handle-loop-for (var)
763 "Support `iter-by' in `loop'. " 763 "Support `iter-by' in `loop'."
764 ;; N.B. While the cl-loop-for-handler is a documented interface, 764 ;; N.B. While the cl-loop-for-handler is a documented interface,
765 ;; there's no documented way for cl-loop-for-handler callbacks to do 765 ;; there's no documented way for cl-loop-for-handler callbacks to do
766 ;; anything useful! Additionally, cl-loop currently lexbinds useful 766 ;; anything useful! Additionally, cl-loop currently lexbinds useful
diff --git a/lisp/erc/erc-dcc.el b/lisp/erc/erc-dcc.el
index 526add1a61f..f3b23369981 100644
--- a/lisp/erc/erc-dcc.el
+++ b/lisp/erc/erc-dcc.el
@@ -88,13 +88,13 @@ All values of the list must be uppercase strings.")
88 (:nick \"nick\" :type SEND :peer server-proc :parent parent-proc :file 88 (:nick \"nick\" :type SEND :peer server-proc :parent parent-proc :file
89 file :sent <marker> :confirmed <marker>)) 89 file :sent <marker> :confirmed <marker>))
90 90
91 :nick - a user or userhost for the peer. combine with :parent to reach them 91 :nick - a user or userhost for the peer. Combine with :parent to reach them
92 92
93 :type - the type of DCC connection - SEND for outgoing files, GET for 93 :type - the type of DCC connection - SEND for outgoing files, GET for
94 incoming, and CHAT for both directions. To tell which end started 94 incoming, and CHAT for both directions. To tell which end started
95 the DCC chat, look at :peer 95 the DCC chat, look at :peer
96 96
97 :peer - the other end of the DCC connection. In the case of outgoing DCCs, 97 :peer - the other end of the DCC connection. In the case of outgoing DCCs,
98 this represents a server process until a connection is established 98 this represents a server process until a connection is established
99 99
100 :parent - the server process where the dcc connection was established. 100 :parent - the server process where the dcc connection was established.
@@ -102,7 +102,7 @@ All values of the list must be uppercase strings.")
102 connection is in general independent from a particular server 102 connection is in general independent from a particular server
103 connection after it was established. 103 connection after it was established.
104 104
105 :file - for outgoing sends, the full path to the file. for incoming sends, 105 :file - for outgoing sends, the full path to the file. For incoming sends,
106 the suggested filename or vetted filename 106 the suggested filename or vetted filename
107 107
108 :size - size of the file, may be nil on incoming DCCs") 108 :size - size of the file, may be nil on incoming DCCs")
@@ -163,11 +163,11 @@ All values of the list must be uppercase strings.")
163 163
164(defun erc-dcc-member (&rest args) 164(defun erc-dcc-member (&rest args)
165 "Return the first matching entry in `erc-dcc-list' which satisfies the 165 "Return the first matching entry in `erc-dcc-list' which satisfies the
166constraints given as a plist in ARGS. Returns nil on no match. 166constraints given as a plist in ARGS. Returns nil on no match.
167 167
168The property :nick is treated specially, if it contains a `!' character, 168The property :nick is treated specially, if it contains a `!' character,
169it is treated as a nick!user@host string, and compared with the :nick property 169it is treated as a nick!user@host string, and compared with the :nick property
170value of the individual elements using string-equal. Otherwise it is 170value of the individual elements using string-equal. Otherwise it is
171compared with `erc-nick-equal-p' which is IRC case-insensitive." 171compared with `erc-nick-equal-p' which is IRC case-insensitive."
172 (let ((list erc-dcc-list) 172 (let ((list erc-dcc-list)
173 result test) 173 result test)
@@ -338,8 +338,8 @@ string \".*!.*@.*\" to this list."
338 :type '(repeat regexp)) 338 :type '(repeat regexp))
339 339
340(defun erc-dcc-server (name filter sentinel) 340(defun erc-dcc-server (name filter sentinel)
341 "Start listening on a port for an incoming DCC connection. Returns the newly 341 "Start listening on a port for an incoming DCC connection.
342created subprocess, or nil." 342Returns the newly created subprocess, or nil."
343 (let ((port (or (and erc-dcc-port-range (car erc-dcc-port-range)) t)) 343 (let ((port (or (and erc-dcc-port-range (car erc-dcc-port-range)) t))
344 (upper (and erc-dcc-port-range (cdr erc-dcc-port-range))) 344 (upper (and erc-dcc-port-range (cdr erc-dcc-port-range)))
345 process) 345 process)
@@ -686,7 +686,7 @@ It extracts the information about the dcc request and adds it to
686 686
687(defun erc-dcc-auto-mask-p (spec) 687(defun erc-dcc-auto-mask-p (spec)
688 "Takes a full SPEC of a user in the form \"nick!login@host\" and 688 "Takes a full SPEC of a user in the form \"nick!login@host\" and
689matches against all the regexp's in `erc-dcc-auto-masks'. If any 689matches against all the regexp's in `erc-dcc-auto-masks'. If any
690match, returns that regexp and nil otherwise." 690match, returns that regexp and nil otherwise."
691 (let ((lst erc-dcc-auto-masks)) 691 (let ((lst erc-dcc-auto-masks))
692 (while (and lst 692 (while (and lst
@@ -908,7 +908,7 @@ other client."
908 908
909(defun erc-dcc-get-file (entry file parent-proc) 909(defun erc-dcc-get-file (entry file parent-proc)
910 "This function does the work of setting up a transfer from the remote client 910 "This function does the work of setting up a transfer from the remote client
911to the local one over a tcp connection. This involves setting up a process 911to the local one over a tcp connection. This involves setting up a process
912filter and a process sentinel, and making the connection." 912filter and a process sentinel, and making the connection."
913 (let* ((buffer (generate-new-buffer (file-name-nondirectory file))) 913 (let* ((buffer (generate-new-buffer (file-name-nondirectory file)))
914 proc) 914 proc)
@@ -1156,7 +1156,7 @@ other client."
1156 buffer)) 1156 buffer))
1157 1157
1158(defun erc-dcc-chat-accept (entry parent-proc) 1158(defun erc-dcc-chat-accept (entry parent-proc)
1159 "Accept an incoming DCC connection and open a DCC window" 1159 "Accept an incoming DCC connection and open a DCC window."
1160 (let* ((nick (erc-extract-nick (plist-get entry :nick))) 1160 (let* ((nick (erc-extract-nick (plist-get entry :nick)))
1161 buffer proc) 1161 buffer proc)
1162 (setq proc 1162 (setq proc
diff --git a/lisp/eshell/em-pred.el b/lisp/eshell/em-pred.el
index cfef59f962e..ca5e2fafa96 100644
--- a/lisp/eshell/em-pred.el
+++ b/lisp/eshell/em-pred.el
@@ -461,7 +461,7 @@ resultant list of strings."
461(defun eshell-pred-file-type (type) 461(defun eshell-pred-file-type (type)
462 "Return a test which tests that the file is of a certain TYPE. 462 "Return a test which tests that the file is of a certain TYPE.
463TYPE must be a character, and should be one of the possible options 463TYPE must be a character, and should be one of the possible options
464that `ls -l' will show in the first column of its display. " 464that `ls -l' will show in the first column of its display."
465 (when (eq type ?%) 465 (when (eq type ?%)
466 (setq type (char-after)) 466 (setq type (char-after))
467 (if (memq type '(?b ?c)) 467 (if (memq type '(?b ?c))
diff --git a/lisp/faces.el b/lisp/faces.el
index 5193c216d0a..efae101cd88 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -1850,7 +1850,7 @@ If FRAME is nil, that stands for the selected frame."
1850(defun defined-colors-with-face-attributes (&optional frame) 1850(defun defined-colors-with-face-attributes (&optional frame)
1851 "Return a list of colors supported for a particular frame. 1851 "Return a list of colors supported for a particular frame.
1852See `defined-colors' for arguments and return value. In contrast 1852See `defined-colors' for arguments and return value. In contrast
1853to `define-colors' the elements of the returned list are color 1853to `define-colorss' the elements of the returned list are color
1854strings with text properties, that make the color names render 1854strings with text properties, that make the color names render
1855with the color they represent as background color." 1855with the color they represent as background color."
1856 (mapcar 1856 (mapcar
diff --git a/lisp/font-core.el b/lisp/font-core.el
index 6b26f0cb92e..e424506795d 100644
--- a/lisp/font-core.el
+++ b/lisp/font-core.el
@@ -126,7 +126,7 @@ buffer local value for `font-lock-defaults', via its mode hook.
126 126
127The above is the default behavior of `font-lock-mode'; you may 127The above is the default behavior of `font-lock-mode'; you may
128specify your own function which is called when `font-lock-mode' 128specify your own function which is called when `font-lock-mode'
129is toggled via `font-lock-function'. " 129is toggled via `font-lock-function'."
130 nil nil nil 130 nil nil nil
131 :after-hook (font-lock-initial-fontify) 131 :after-hook (font-lock-initial-fontify)
132 ;; Don't turn on Font Lock mode if we don't have a display (we're running a 132 ;; Don't turn on Font Lock mode if we don't have a display (we're running a
diff --git a/lisp/frame.el b/lisp/frame.el
index fd7e872fb6d..e9d4b2ebe4c 100644
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -1817,7 +1817,7 @@ below (above if ABOVE is true) that of FRAME2. Hence the
1817position of FRAME2 in its display's Z (stacking) order relative 1817position of FRAME2 in its display's Z (stacking) order relative
1818to all other frames excluding FRAME1 remains unaltered. 1818to all other frames excluding FRAME1 remains unaltered.
1819 1819
1820Some window managers may refuse to restack windows. " 1820Some window managers may refuse to restack windows."
1821 (if (and (frame-live-p frame1) 1821 (if (and (frame-live-p frame1)
1822 (frame-live-p frame2) 1822 (frame-live-p frame2)
1823 (equal (frame-parameter frame1 'display) 1823 (equal (frame-parameter frame1 'display)
diff --git a/lisp/international/kkc.el b/lisp/international/kkc.el
index 6691ee9eb9b..437971742dc 100644
--- a/lisp/international/kkc.el
+++ b/lisp/international/kkc.el
@@ -613,7 +613,7 @@ and change the current conversion to the last one in the group."
613 (message "%s" msg)))) 613 (message "%s" msg))))
614 614
615;; Update the conversion area with the latest conversion selected. 615;; Update the conversion area with the latest conversion selected.
616;; ALL if non nil means to update the whole area, else update only 616;; ALL if non-nil means to update the whole area, else update only
617;; inside quail-overlay-head. 617;; inside quail-overlay-head.
618 618
619(defun kkc-update-conversion (&optional all) 619(defun kkc-update-conversion (&optional all)
diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index 1dff129b9dc..e73c7cdee1b 100644
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -115,7 +115,7 @@ Alternative suggestions are:
115 'browse-url-secondary-browser-function "27.1") 115 'browse-url-secondary-browser-function "27.1")
116 116
117(defcustom shr-image-animate t 117(defcustom shr-image-animate t
118 "Non nil means that images that can be animated will be." 118 "Non-nil means that images that can be animated will be."
119 :version "24.4" 119 :version "24.4"
120 :type 'boolean) 120 :type 'boolean)
121 121
diff --git a/lisp/org/org-agenda.el b/lisp/org/org-agenda.el
index a6195cfb2a5..e50ec3cf08f 100644
--- a/lisp/org/org-agenda.el
+++ b/lisp/org/org-agenda.el
@@ -8908,7 +8908,7 @@ The new content of the line will be NEWHEAD (as modified by
8908If FIXFACE is non-nil, the face of each item is modified according to 8908If FIXFACE is non-nil, the face of each item is modified according to
8909the new TODO state. 8909the new TODO state.
8910If JUST-THIS is non-nil, change just the current line, not all. 8910If JUST-THIS is non-nil, change just the current line, not all.
8911If FORCE-TAGS is non nil, the car of it returns the new tags." 8911If FORCE-TAGS is non-nil, the car of it returns the new tags."
8912 (let* ((inhibit-read-only t) 8912 (let* ((inhibit-read-only t)
8913 (line (org-current-line)) 8913 (line (org-current-line))
8914 (org-agenda-buffer (current-buffer)) 8914 (org-agenda-buffer (current-buffer))
@@ -10205,7 +10205,7 @@ to override `appt-message-warning-time'."
10205 (message "Added %d event%s for today" cnt (if (> cnt 1) "s" ""))))) 10205 (message "Added %d event%s for today" cnt (if (> cnt 1) "s" "")))))
10206 10206
10207(defun org-agenda-today-p (date) 10207(defun org-agenda-today-p (date)
10208 "Non nil when DATE means today. 10208 "Non-nil when DATE means today.
10209DATE is either a list of the form (month day year) or a number of 10209DATE is either a list of the form (month day year) or a number of
10210days as returned by `calendar-absolute-from-gregorian' or 10210days as returned by `calendar-absolute-from-gregorian' or
10211`org-today'. This function considers `org-extend-today-until' 10211`org-today'. This function considers `org-extend-today-until'
diff --git a/lisp/org/org-id.el b/lisp/org/org-id.el
index 34084bfa109..7f7faaae8e8 100644
--- a/lisp/org/org-id.el
+++ b/lisp/org/org-id.el
@@ -241,7 +241,7 @@ Create an ID if necessary."
241 "Get the ID property of the entry at point-or-marker POM. 241 "Get the ID property of the entry at point-or-marker POM.
242If POM is nil, refer to the entry at point. 242If POM is nil, refer to the entry at point.
243If the entry does not have an ID, the function returns nil. 243If the entry does not have an ID, the function returns nil.
244However, when CREATE is non nil, create an ID if none is present already. 244However, when CREATE is non-nil, create an ID if none is present already.
245PREFIX will be passed through to `org-id-new'. 245PREFIX will be passed through to `org-id-new'.
246In any case, the ID of the entry is returned." 246In any case, the ID of the entry is returned."
247 (org-with-point-at pom 247 (org-with-point-at pom
diff --git a/lisp/org/org.el b/lisp/org/org.el
index ab29353ae89..1bb46e49c74 100644
--- a/lisp/org/org.el
+++ b/lisp/org/org.el
@@ -4280,7 +4280,7 @@ org-level-* faces."
4280 4280
4281(defcustom org-highlight-latex-and-related nil 4281(defcustom org-highlight-latex-and-related nil
4282 "Non-nil means highlight LaTeX related syntax in the buffer. 4282 "Non-nil means highlight LaTeX related syntax in the buffer.
4283When non nil, the value should be a list containing any of the 4283When non-nil, the value should be a list containing any of the
4284following symbols: 4284following symbols:
4285 `latex' Highlight LaTeX snippets and environments. 4285 `latex' Highlight LaTeX snippets and environments.
4286 `script' Highlight subscript and superscript. 4286 `script' Highlight subscript and superscript.
@@ -15434,7 +15434,7 @@ but in some other way.")
15434Being in this list makes sure that they are offered for completion.") 15434Being in this list makes sure that they are offered for completion.")
15435 15435
15436(defun org--valid-property-p (property) 15436(defun org--valid-property-p (property)
15437 "Non nil when string PROPERTY is a valid property name." 15437 "Non-nil when string PROPERTY is a valid property name."
15438 (not 15438 (not
15439 (or (equal property "") 15439 (or (equal property "")
15440 (string-match-p "\\s-" property)))) 15440 (string-match-p "\\s-" property))))
diff --git a/lisp/org/ox-beamer.el b/lisp/org/ox-beamer.el
index 11574a97162..77c1b33c5d9 100644
--- a/lisp/org/ox-beamer.el
+++ b/lisp/org/ox-beamer.el
@@ -326,7 +326,7 @@ INFO is a plist used as a communication channel.
326 326
327The value is either the label specified in \"BEAMER_opt\" 327The value is either the label specified in \"BEAMER_opt\"
328property, the custom ID, if there is one and 328property, the custom ID, if there is one and
329`:latex-prefer-user-labels' property has a non nil value, or 329`:latex-prefer-user-labels' property has a non-nil value, or
330a unique internal label. This function assumes HEADLINE will be 330a unique internal label. This function assumes HEADLINE will be
331treated as a frame." 331treated as a frame."
332 (cond 332 (cond
diff --git a/lisp/org/ox-latex.el b/lisp/org/ox-latex.el
index d711530bf71..b029f828e4f 100644
--- a/lisp/org/ox-latex.el
+++ b/lisp/org/ox-latex.el
@@ -1236,7 +1236,7 @@ calling `org-latex-compile'."
1236;;; Internal Functions 1236;;; Internal Functions
1237 1237
1238(defun org-latex--caption-above-p (element info) 1238(defun org-latex--caption-above-p (element info)
1239 "Non nil when caption is expected to be located above ELEMENT. 1239 "Non-nil when caption is expected to be located above ELEMENT.
1240INFO is a plist holding contextual information." 1240INFO is a plist holding contextual information."
1241 (let ((above (plist-get info :latex-caption-above))) 1241 (let ((above (plist-get info :latex-caption-above)))
1242 (if (symbolp above) above 1242 (if (symbolp above) above
diff --git a/lisp/org/ox-odt.el b/lisp/org/ox-odt.el
index 8deb6bd51ab..999a2b7f5cf 100644
--- a/lisp/org/ox-odt.el
+++ b/lisp/org/ox-odt.el
@@ -2174,7 +2174,7 @@ SHORT-CAPTION are strings."
2174;;;; Links :: Inline Images 2174;;;; Links :: Inline Images
2175 2175
2176(defun org-odt--copy-image-file (path) 2176(defun org-odt--copy-image-file (path)
2177 "Returns the internal name of the file" 2177 "Return the internal name of the file"
2178 (let* ((image-type (file-name-extension path)) 2178 (let* ((image-type (file-name-extension path))
2179 (media-type (format "image/%s" image-type)) 2179 (media-type (format "image/%s" image-type))
2180 (target-dir "Images/") 2180 (target-dir "Images/")
@@ -2379,7 +2379,7 @@ used as a communication channel."
2379 (concat equation "<text:tab/>" label)))))) 2379 (concat equation "<text:tab/>" label))))))
2380 2380
2381(defun org-odt--copy-formula-file (src-file) 2381(defun org-odt--copy-formula-file (src-file)
2382 "Returns the internal name of the file" 2382 "Return the internal name of the file"
2383 (let* ((target-dir (format "Formula-%04d/" 2383 (let* ((target-dir (format "Formula-%04d/"
2384 (cl-incf org-odt-embedded-formulas-count))) 2384 (cl-incf org-odt-embedded-formulas-count)))
2385 (target-file (concat target-dir "content.xml"))) 2385 (target-file (concat target-dir "content.xml")))
diff --git a/lisp/org/ox.el b/lisp/org/ox.el
index 58bc9b0ffb0..aa04676db8d 100644
--- a/lisp/org/ox.el
+++ b/lisp/org/ox.el
@@ -804,7 +804,7 @@ also be set with the OPTIONS keyword, e.g. \"timestamp:nil\"."
804 :safe #'booleanp) 804 :safe #'booleanp)
805 805
806(defcustom org-export-with-timestamps t 806(defcustom org-export-with-timestamps t
807 "Non nil means allow timestamps in export. 807 "Non-nil means allow timestamps in export.
808 808
809It can be set to any of the following values: 809It can be set to any of the following values:
810 t export all timestamps. 810 t export all timestamps.
diff --git a/lisp/progmodes/cc-mode.el b/lisp/progmodes/cc-mode.el
index 76f5de212f2..631787d73f1 100644
--- a/lisp/progmodes/cc-mode.el
+++ b/lisp/progmodes/cc-mode.el
@@ -1966,7 +1966,7 @@ Note that this is a strict tail, so won't match, e.g. \"0x....\".")
1966 ;; these caches from inside them, and we must thus be sure that this 1966 ;; these caches from inside them, and we must thus be sure that this
1967 ;; has already been executed. 1967 ;; has already been executed.
1968 ;; 1968 ;;
1969 ;; This calls the language variable c-before-font-lock-functions, if non nil. 1969 ;; This calls the language variable c-before-font-lock-functions, if non-nil.
1970 ;; This typically sets `syntax-table' properties. 1970 ;; This typically sets `syntax-table' properties.
1971 1971
1972 ;; We can sometimes get two consecutive calls to `after-change-functions' 1972 ;; We can sometimes get two consecutive calls to `after-change-functions'
diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el
index 78f27295f0c..a0351610008 100644
--- a/lisp/progmodes/etags.el
+++ b/lisp/progmodes/etags.el
@@ -1313,7 +1313,7 @@ buffer-local values of tags table format variables."
1313 ;; Find the end of the tag and record the whole tag text. 1313 ;; Find the end of the tag and record the whole tag text.
1314 (search-forward "\177") 1314 (search-forward "\177")
1315 (setq tag-text (buffer-substring (1- (point)) (point-at-bol))) 1315 (setq tag-text (buffer-substring (1- (point)) (point-at-bol)))
1316 ;; If use-explicit is non nil and explicit tag is present, use it as part of 1316 ;; If use-explicit is non-nil and explicit tag is present, use it as part of
1317 ;; return value. Else just skip it. 1317 ;; return value. Else just skip it.
1318 (setq explicit-start (point)) 1318 (setq explicit-start (point))
1319 (when (and (search-forward "\001" (point-at-bol 2) t) 1319 (when (and (search-forward "\001" (point-at-bol 2) t)
diff --git a/lisp/progmodes/verilog-mode.el b/lisp/progmodes/verilog-mode.el
index 2939108d47b..293d0b2450b 100644
--- a/lisp/progmodes/verilog-mode.el
+++ b/lisp/progmodes/verilog-mode.el
@@ -626,7 +626,7 @@ If nil, indent as:
626 input [31:0] a; 626 input [31:0] a;
627 input \\=`CP; 627 input \\=`CP;
628 output c; 628 output c;
629If non nil, treat as: 629If non-nil, treat as:
630 input [31:0] a; 630 input [31:0] a;
631 input \\=`CP ; 631 input \\=`CP ;
632 output c;" 632 output c;"
diff --git a/lisp/ses.el b/lisp/ses.el
index 37d0d615033..36c966432c9 100644
--- a/lisp/ses.el
+++ b/lisp/ses.el
@@ -1435,7 +1435,7 @@ ses--default-printer, ses--numrows, or ses--numcols."
1435 "Extend the global parameters list when file format is updated 1435 "Extend the global parameters list when file format is updated
1436from 2 to 3. This happens when local printer function are added 1436from 2 to 3. This happens when local printer function are added
1437to a sheet that was created with SES version 2. This is not 1437to a sheet that was created with SES version 2. This is not
1438undoable. Return nil when there was no change, and non nil otherwise." 1438undoable. Return nil when there was no change, and non-nil otherwise."
1439 (save-excursion 1439 (save-excursion
1440 (cond 1440 (cond
1441 ((and (= ses--file-format 2) (= 3 new-file-format)) 1441 ((and (= ses--file-format 2) (= 3 new-file-format))
diff --git a/lisp/term.el b/lisp/term.el
index 77fbb1d0915..66ae470239a 100644
--- a/lisp/term.el
+++ b/lisp/term.el
@@ -4209,7 +4209,7 @@ the process. Any more args are arguments to PROGRAM."
4209(defun ansi-term (program &optional new-buffer-name) 4209(defun ansi-term (program &optional new-buffer-name)
4210 "Start a terminal-emulator in a new buffer. 4210 "Start a terminal-emulator in a new buffer.
4211This is almost the same as `term' apart from always creating a new buffer, 4211This is almost the same as `term' apart from always creating a new buffer,
4212and `C-x' being marked as a `term-escape-char'. " 4212and `C-x' being marked as a `term-escape-char'."
4213 (interactive (list (read-from-minibuffer "Run program: " 4213 (interactive (list (read-from-minibuffer "Run program: "
4214 (or explicit-shell-file-name 4214 (or explicit-shell-file-name
4215 (getenv "ESHELL") 4215 (getenv "ESHELL")
diff --git a/lisp/textmodes/bibtex.el b/lisp/textmodes/bibtex.el
index a560c2b097f..5ae8097891a 100644
--- a/lisp/textmodes/bibtex.el
+++ b/lisp/textmodes/bibtex.el
@@ -862,7 +862,7 @@ To interactively change the dialect use the command `bibtex-set-dialect'."
862 862
863(defcustom bibtex-no-opt-remove-re "\\`option" 863(defcustom bibtex-no-opt-remove-re "\\`option"
864 "If a field name matches this regexp, the prefix OPT is not removed. 864 "If a field name matches this regexp, the prefix OPT is not removed.
865If nil prefix OPT is always removed" 865If nil prefix OPT is always removed."
866 :group 'bibtex 866 :group 'bibtex
867 :version "24.1" 867 :version "24.1"
868 :type '(choice (regexp) (const nil))) 868 :type '(choice (regexp) (const nil)))
@@ -2188,7 +2188,7 @@ If FLAG is nil, a message is echoed if point was incremented at least
2188(defun bibtex-beginning-of-first-entry () 2188(defun bibtex-beginning-of-first-entry ()
2189 "Go to beginning of line of first BibTeX entry in buffer. 2189 "Go to beginning of line of first BibTeX entry in buffer.
2190If `bibtex-sort-ignore-string-entries' is non-nil, @String entries 2190If `bibtex-sort-ignore-string-entries' is non-nil, @String entries
2191are ignored. Return point" 2191are ignored. Return point."
2192 (goto-char (point-min)) 2192 (goto-char (point-min))
2193 (bibtex-skip-to-valid-entry) 2193 (bibtex-skip-to-valid-entry)
2194 (point)) 2194 (point))
@@ -2714,7 +2714,7 @@ and `bibtex-autokey-names-stretch'."
2714 2714
2715(defun bibtex-autokey-get-title () 2715(defun bibtex-autokey-get-title ()
2716 "Get title field contents up to a terminator. 2716 "Get title field contents up to a terminator.
2717Return the result as a string" 2717Return the result as a string."
2718 (let ((case-fold-search t) 2718 (let ((case-fold-search t)
2719 (titlestring 2719 (titlestring
2720 (bibtex-autokey-get-field "title" 2720 (bibtex-autokey-get-field "title"
@@ -2866,7 +2866,7 @@ Concatenate the key:
2866(defun bibtex-read-key (prompt &optional key global) 2866(defun bibtex-read-key (prompt &optional key global)
2867 "Read BibTeX key from minibuffer using PROMPT and default KEY. 2867 "Read BibTeX key from minibuffer using PROMPT and default KEY.
2868If optional arg GLOBAL is non-nil, completion is based on the keys in 2868If optional arg GLOBAL is non-nil, completion is based on the keys in
2869`bibtex-reference-keys' of `bibtex-files'," 2869`bibtex-reference-keys' of `bibtex-files'."
2870 (let (completion-ignore-case) 2870 (let (completion-ignore-case)
2871 (completing-read prompt (if global (bibtex-global-key-alist) 2871 (completing-read prompt (if global (bibtex-global-key-alist)
2872 bibtex-reference-keys) 2872 bibtex-reference-keys)
@@ -3054,7 +3054,7 @@ already set. If SELECT is non-nil interactively select a BibTeX buffer.
3054 3054
3055When called interactively, FORCE is t, CURRENT is t if current buffer 3055When called interactively, FORCE is t, CURRENT is t if current buffer
3056visits a file using `bibtex-mode', and SELECT is t if current buffer 3056visits a file using `bibtex-mode', and SELECT is t if current buffer
3057does not use `bibtex-mode'," 3057does not use `bibtex-mode'."
3058 (interactive (list (eq major-mode 'bibtex-mode) t 3058 (interactive (list (eq major-mode 'bibtex-mode) t
3059 (not (eq major-mode 'bibtex-mode)))) 3059 (not (eq major-mode 'bibtex-mode))))
3060 (let ((file-path (split-string (or bibtex-file-path default-directory) ":+")) 3060 (let ((file-path (split-string (or bibtex-file-path default-directory) ":+"))
diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el
index bfe912308e9..bae0283497e 100644
--- a/lisp/textmodes/flyspell.el
+++ b/lisp/textmodes/flyspell.el
@@ -1116,7 +1116,7 @@ Mostly we check word delimiters."
1116If the optional argument FOLLOWING, or, when called interactively 1116If the optional argument FOLLOWING, or, when called interactively
1117`ispell-following-word', is non-nil, checks the following (rather 1117`ispell-following-word', is non-nil, checks the following (rather
1118than preceding) word when the cursor is not over a word. If 1118than preceding) word when the cursor is not over a word. If
1119optional argument KNOWN-MISSPELLING is non nil considers word a 1119optional argument KNOWN-MISSPELLING is non-nil considers word a
1120misspelling and skips redundant spell-checking step. 1120misspelling and skips redundant spell-checking step.
1121 1121
1122See `flyspell-get-word' for details of how this finds the word to 1122See `flyspell-get-word' for details of how this finds the word to
diff --git a/lisp/view.el b/lisp/view.el
index deda061cd39..f9aa86617a4 100644
--- a/lisp/view.el
+++ b/lisp/view.el
@@ -581,7 +581,7 @@ the associations of any windows with the current buffer.
581EXIT-ACTION, if non-nil, must specify a function that is called 581EXIT-ACTION, if non-nil, must specify a function that is called
582with the current buffer as argument and is called after disabling 582with the current buffer as argument and is called after disabling
583`view-mode' and removing any associations of windows with the 583`view-mode' and removing any associations of windows with the
584current buffer. " 584current buffer."
585 (when view-mode 585 (when view-mode
586 (let ((buffer (window-buffer))) 586 (let ((buffer (window-buffer)))
587 (unless view-no-disable-on-exit 587 (unless view-no-disable-on-exit
diff --git a/src/composite.c b/src/composite.c
index efbd055cef2..2725ab3b99c 100644
--- a/src/composite.c
+++ b/src/composite.c
@@ -77,7 +77,7 @@ along with GNU Emacs. If not, see <https://www.gnu.org/licenses/>. */
77 composition, the elements are characters or encoded 77 composition, the elements are characters or encoded
78 composition rules. 78 composition rules.
79 79
80 MODIFICATION-FUNC -- If non nil, it is a function to call when the 80 MODIFICATION-FUNC -- If non-nil, it is a function to call when the
81 composition gets invalid after a modification in a buffer. If 81 composition gets invalid after a modification in a buffer. If
82 it is nil, a function in `composition-function-table' of the 82 it is nil, a function in `composition-function-table' of the
83 first character in the sequence is called. 83 first character in the sequence is called.
diff --git a/src/floatfns.c b/src/floatfns.c
index 9049185307c..3199d572138 100644
--- a/src/floatfns.c
+++ b/src/floatfns.c
@@ -141,7 +141,7 @@ DEFUN ("tan", Ftan, Stan, 1, 1, 0,
141} 141}
142 142
143DEFUN ("isnan", Fisnan, Sisnan, 1, 1, 0, 143DEFUN ("isnan", Fisnan, Sisnan, 1, 1, 0,
144 doc: /* Return non nil if argument X is a NaN. */) 144 doc: /* Return non-nil if argument X is a NaN. */)
145 (Lisp_Object x) 145 (Lisp_Object x)
146{ 146{
147 CHECK_FLOAT (x); 147 CHECK_FLOAT (x);