Function: hack-connection-local-variables
hack-connection-local-variables is an autoloaded and byte-compiled
function defined in files-x.el.gz.
Signature
(hack-connection-local-variables CRITERIA)
Documentation
Read connection-local variables according to CRITERIA.
Store the connection-local variables in buffer local
variable connection-local-variables-alist.
This does nothing if enable-connection-local-variables is nil.
Source Code
;; Defined in /usr/src/emacs/lisp/files-x.el.gz
;;;###autoload
(defun hack-connection-local-variables (criteria)
"Read connection-local variables according to CRITERIA.
Store the connection-local variables in buffer local
variable `connection-local-variables-alist'.
This does nothing if `enable-connection-local-variables' is nil."
(when enable-connection-local-variables
;; Filter connection profiles.
(dolist (profile (connection-local-get-profiles criteria))
;; Loop over variables.
(dolist (variable (connection-local-get-profile-variables profile))
(unless (assq (car variable) connection-local-variables-alist)
(push variable connection-local-variables-alist))))
;; Push them to `file-local-variables-alist'. Connection-local
;; variables do not appear from external files. So we can regard
;; them as safe.
(let ((enable-local-variables :all))
(hack-local-variables-filter connection-local-variables-alist nil))))