mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-05 22:20:24 -08:00
EUDC: Fix checkdoc errors
* lisp/net/eudc.el (eudc--plist-member) (eudc-format-inline-expansion-result): Fix checkdoc errors.
This commit is contained in:
parent
9a7917f886
commit
ab568bce0c
1 changed files with 5 additions and 2 deletions
|
|
@ -109,7 +109,9 @@
|
|||
(version<= "3" (car (split-string bbdb-version)))))
|
||||
|
||||
(defun eudc--plist-member (plist prop &optional predicate)
|
||||
"Like `plist-member', but signal on invalid PLIST."
|
||||
"Like `plist-member', but signal on invalid PLIST.
|
||||
Return t if PROP has a value specified in PLIST. The comparison with
|
||||
PROP is done using PREDICATE, which defaults to `eq'."
|
||||
(or (plistp plist)
|
||||
(signal 'wrong-type-argument `(plistp ,plist)))
|
||||
(plist-member plist prop predicate))
|
||||
|
|
@ -883,7 +885,8 @@ non-nil, collect results from all servers."
|
|||
|
||||
;;;###autoload
|
||||
(defun eudc-format-inline-expansion-result (res query-attrs)
|
||||
"Format a query result according to `eudc-inline-expansion-format'."
|
||||
"Format a query result RES according to `eudc-inline-expansion-format'.
|
||||
QUERY-ATTRS is a list of attributes to include in the expansion."
|
||||
(cond
|
||||
;; format string
|
||||
((consp eudc-inline-expansion-format)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue