aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/auth-source.el
diff options
context:
space:
mode:
authorJuanma Barranquero2019-10-20 12:12:27 +0200
committerJuanma Barranquero2019-10-20 12:12:27 +0200
commit41ba8231ef072571e1a6feabc15d113e5cf57556 (patch)
treeebfb9888ed6f62295fac4a0c7858f6881ffda491 /lisp/auth-source.el
parente2acf4d29d6f03c7b8c6fbeb61ed1f4a6ef5b1fd (diff)
downloademacs-41ba8231ef072571e1a6feabc15d113e5cf57556.tar.gz
emacs-41ba8231ef072571e1a6feabc15d113e5cf57556.zip
lisp/*.el: Fix typos and improve some docstrings
* lisp/auth-source.el (auth-source-backend-parse-parameters) (auth-source-search-collection) (auth-source-secrets-listify-pattern) (auth-source--decode-octal-string, auth-source-plstore-search): * lisp/registry.el (registry-lookup) (registry-lookup-breaks-before-lexbind) (registry-lookup-secondary, registry-lookup-secondary-value) (registry-search, registry-delete, registry-size, registry-full) (registry-insert, registry-reindex, registry-prune) (registry-collect-prune-candidates): * lisp/subr.el (nbutlast, process-live-p): * lisp/tab-bar.el (tab-bar-list): * lisp/cedet/ede/linux.el (ede-linux--get-archs) (ede-linux--include-path, ede-linux-load): * lisp/erc/erc-log.el (erc-log-all-but-server-buffers): * lisp/erc/erc-pcomplete.el (pcomplete-erc-commands) (pcomplete-erc-ops, pcomplete-erc-not-ops, pcomplete-erc-nicks) (pcomplete-erc-all-nicks, pcomplete-erc-channels) (pcomplete-erc-command-name, pcomplete-erc-parse-arguments): * lisp/eshell/em-term.el (eshell-visual-command-p): * lisp/gnus/gnus-cache.el (gnus-cache-fully-p): * lisp/gnus/nnmail.el (nnmail-get-active) (nnmail-fancy-expiry-target): * lisp/mail/mail-utils.el (mail-string-delete): * lisp/mail/supercite.el (sc-hdr, sc-valid-index-p): * lisp/net/ange-ftp.el (ange-ftp-use-smart-gateway-p): * lisp/net/nsm.el (nsm-save-fingerprint-maybe) (nsm-network-same-subnet, nsm-should-check): * lisp/net/rcirc.el (rcirc-looking-at-input): * lisp/net/tramp-cache.el (tramp-get-hash-table): * lisp/net/tramp-compat.el (tramp-compat-process-running-p): * lisp/net/tramp-smb.el (tramp-smb-get-share) (tramp-smb-get-localname, tramp-smb-read-file-entry) (tramp-smb-get-cifs-capabilities, tramp-smb-get-stat-capability): * lisp/net/zeroconf.el (zeroconf-list-service-names) (zeroconf-list-service-types, zeroconf-list-services) (zeroconf-get-host, zeroconf-get-domain) (zeroconf-get-host-domain): * lisp/nxml/rng-xsd.el (rng-xsd-compile) (rng-xsd-make-date-time-regexp, rng-xsd-convert-date-time): * lisp/obsolete/erc-hecomplete.el (erc-hecomplete) (erc-command-list, erc-complete-at-prompt): * lisp/org/ob-scheme.el (org-babel-scheme-get-buffer-impl): * lisp/org/ob-shell.el (org-babel--variable-assignments:sh-generic) (org-babel--variable-assignments:bash_array) (org-babel--variable-assignments:bash_assoc) (org-babel--variable-assignments:bash): * lisp/org/org-clock.el (org-day-of-week): * lisp/progmodes/cperl-mode.el (cperl-char-ends-sub-keyword-p): * lisp/progmodes/gud.el (gud-find-c-expr, gud-innermost-expr) (gud-prev-expr, gud-next-expr): * lisp/textmodes/table.el (table--at-cell-p, table--probe-cell) (table--get-cell-justify-property) (table--get-cell-valign-property) (table--put-cell-justify-property) (table--put-cell-valign-property): Fix typos. * lisp/so-long.el (fboundp): Doc fix. (so-long-mode-line-info, so-long-mode) (so-long--check-header-modes): Fix typos. * lisp/emulation/viper-mous.el (viper-surrounding-word) (viper-mouse-click-get-word): Fix typos. (viper-mouse-click-search-word): Doc fix. * lisp/erc/erc-backend.el (erc-forward-word, erc-word-at-arg-p) (erc-bounds-of-word-at-point): Fix typos. (erc-decode-string-from-target, define-erc-response-handler): Refill docstring. * lisp/erc/erc-dcc.el (pcomplete/erc-mode/DCC): Fix typo. (erc-dcc-get-host, erc-dcc-auto-mask-p, erc-dcc-get-file): Doc fixes. * lisp/erc/erc-networks.el (erc-network-name): Fix typo. (erc-determine-network): Refill docstring. * lisp/net/dbus.el (dbus-list-hash-table) (dbus-string-to-byte-array, dbus-byte-array-to-string) (dbus-check-event): Fix typos. (dbus-introspect-get-property): Doc fix. * lisp/net/tramp-adb.el (tramp-adb-file-name-handler): Rename ARGS to ARGUMENTS. Doc fix. (tramp-adb-sh-fix-ls-output, tramp-adb-execute-adb-command) (tramp-adb-find-test-command): Fix typos. * lisp/net/tramp.el (tramp-set-completion-function) (tramp-get-completion-function) (tramp-completion-dissect-file-name) (tramp-completion-dissect-file-name1) (tramp-get-completion-methods, tramp-get-completion-user-host) (tramp-get-inode, tramp-get-device, tramp-mode-string-to-int) (tramp-call-process, tramp-call-process-region) (tramp-process-lines): Fix typos. (tramp-interrupt-process): Doc fix. * lisp/org/ob-core.el (org-babel-named-src-block-regexp-for-name) (org-babel-named-data-regexp-for-name): Doc fix. (org-babel-src-block-names, org-babel-result-names): Fix typos. * lisp/progmodes/inf-lisp.el (lisp-input-filter): Doc fix. (lisp-fn-called-at-pt): Fix typo. * lisp/progmodes/xref.el (xref-backend-identifier-at-point): Doc fix. (xref-backend-identifier-completion-table): Fix typo.
Diffstat (limited to 'lisp/auth-source.el')
-rw-r--r--lisp/auth-source.el14
1 files changed, 7 insertions, 7 deletions
diff --git a/lisp/auth-source.el b/lisp/auth-source.el
index fdd869df3a6..4926f67f0a1 100644
--- a/lisp/auth-source.el
+++ b/lisp/auth-source.el
@@ -504,7 +504,7 @@ soon as a function returns non-nil.")
504(add-hook 'auth-source-backend-parser-functions #'auth-source-backends-parser-secrets) 504(add-hook 'auth-source-backend-parser-functions #'auth-source-backends-parser-secrets)
505 505
506(defun auth-source-backend-parse-parameters (entry backend) 506(defun auth-source-backend-parse-parameters (entry backend)
507 "Fills in the extra auth-source-backend parameters of ENTRY. 507 "Fill in the extra auth-source-backend parameters of ENTRY.
508Using the plist ENTRY, get the :host, :port, and :user search 508Using the plist ENTRY, get the :host, :port, and :user search
509parameters." 509parameters."
510 (let ((entry (if (stringp entry) 510 (let ((entry (if (stringp entry)
@@ -773,7 +773,7 @@ Returns the deleted entries."
773 (apply #'auth-source-search (plist-put spec :delete t))) 773 (apply #'auth-source-search (plist-put spec :delete t)))
774 774
775(defun auth-source-search-collection (collection value) 775(defun auth-source-search-collection (collection value)
776 "Returns t is VALUE is t or COLLECTION is t or COLLECTION contains VALUE." 776 "Return t if VALUE is t or COLLECTION is t or COLLECTION contains VALUE."
777 (when (and (atom collection) (not (eq t collection))) 777 (when (and (atom collection) (not (eq t collection)))
778 (setq collection (list collection))) 778 (setq collection (list collection)))
779 779
@@ -1514,15 +1514,15 @@ Respects `auth-source-save-behavior'. Uses
1514;;; Backend specific parsing: Secrets API backend 1514;;; Backend specific parsing: Secrets API backend
1515 1515
1516(defun auth-source-secrets-listify-pattern (pattern) 1516(defun auth-source-secrets-listify-pattern (pattern)
1517 "Convert a pattern with lists to a list of string patterns. 1517 "Convert a PATTERN with lists to a list of string patterns.
1518 1518
1519auth-source patterns can have values of the form :foo (\"bar\" 1519auth-source patterns can have values of the form :foo (\"bar\"
1520\"qux\"), which means to match any secret with :foo equal to 1520\"qux\"), which means to match any secret with :foo equal to
1521\"bar\" or :foo equal to \"qux\". The secrets backend supports 1521\"bar\" or :foo equal to \"qux\". The secrets backend supports
1522only string values for patterns, so this routine returns a list 1522only string values for patterns, so this routine returns a list
1523of patterns that is equivalent to the single original pattern 1523of patterns that is equivalent to the single original PATTERN
1524when interpreted such that if a secret matches any pattern in the 1524when interpreted such that if a secret matches any pattern in the
1525list, it matches the original pattern." 1525list, it matches the original PATTERN."
1526 (if (null pattern) 1526 (if (null pattern)
1527 '(nil) 1527 '(nil)
1528 (let* ((key (pop pattern)) 1528 (let* ((key (pop pattern))
@@ -1935,7 +1935,7 @@ entries for git.gnus.org:
1935 1935
1936 1936
1937(defun auth-source--decode-octal-string (string) 1937(defun auth-source--decode-octal-string (string)
1938 "Convert octal string to utf-8 string. E.g: 'a\134b' to 'a\b'" 1938 "Convert octal string to utf-8 string. E.g: 'a\134b' to 'a\b'"
1939 (let ((list (string-to-list string)) 1939 (let ((list (string-to-list string))
1940 (size (length string))) 1940 (size (length string)))
1941 (decode-coding-string 1941 (decode-coding-string
@@ -2034,7 +2034,7 @@ entries for git.gnus.org:
2034(cl-defun auth-source-plstore-search (&rest spec 2034(cl-defun auth-source-plstore-search (&rest spec
2035 &key backend create delete max 2035 &key backend create delete max
2036 &allow-other-keys) 2036 &allow-other-keys)
2037 "Search the PLSTORE; spec is like `auth-source'." 2037 "Search the PLSTORE; SPEC is like `auth-source'."
2038 (let* ((store (oref backend data)) 2038 (let* ((store (oref backend data))
2039 (max (or max 5000)) ; sanity check: default to stop at 5K 2039 (max (or max 5000)) ; sanity check: default to stop at 5K
2040 (ignored-keys '(:create :delete :max :backend :label :require :type)) 2040 (ignored-keys '(:create :delete :max :backend :label :require :type))