Lines Matching defs:variable
130 ;; KIND should be `var' for a variable or `subr' for a subroutine."
137 KIND should be `var' for a variable or `subr' for a subroutine."
403 (defun variable-at-point (&optional any-symbol)
404 "Return the bound variable symbol found at or before point.
429 (defun describe-variable (variable &optional buffer)
435 (let ((v (variable-at-point))
440 "Describe variable (default %s): " v)
441 "Describe variable: ")
445 (get vv 'variable-documentation)))
451 (if (not (symbolp variable))
452 (message "You did not specify a variable")
454 (let* ((valvoid (not (with-current-buffer buffer (boundp variable))))
457 (val (unless valvoid (buffer-local-value variable buffer)))
459 (help-setup-xref (list #'describe-variable variable buffer)
463 (prin1 variable)
467 (let ((file-name (symbol-file variable 'defvar)))
470 ;; Find the real def site of the preloaded variable.
473 (find-variable-noselect variable file-name)
483 (integerp (get variable 'variable-documentation)))
484 ;; It's a variable not defined in Elisp but in C.
487 (help-C-file-name variable 'var)
491 (princ " is a variable defined in `")
497 (help-xref-button 1 'help-variable-def
498 variable file-name)))
500 (princ "It is void as a variable.")
503 (princ " is void as a variable.")
513 ;; Hyperlinks in variable's value are quite frequently
520 (when (local-variable-p variable)
522 (if (get variable 'permanent-local)
525 (if (not (default-boundp variable))
527 (let ((val (default-value variable)))
542 (when (and (local-variable-if-set-p variable)
543 (or (not (local-variable-p variable))
545 (local-variable-if-set-p variable))))
564 (set (make-local-variable 'help-button-cache)
575 (indirect-variable variable)
576 (error variable)))
577 (obsolete (get variable 'byte-obsolete-variable))
578 (safe-var (get variable 'safe-local-variable))
579 (doc (or (documentation-property variable 'variable-documentation)
580 (documentation-property alias 'variable-documentation))))
581 (unless (eq alias variable)
582 (princ (format "\nThis variable is an alias for `%s'.\n" alias)))
587 (princ "This variable is obsolete")
594 (princ "This variable is safe as a file local variable ")
600 (princ (or doc "Not documented as a variable.")))
601 ;; Make a link to customize if this variable can be customized.
602 (if (custom-variable-p variable)
606 (princ (concat "You can " customize-label " this variable."))
611 (help-xref-button 1 'help-customize-variable variable)))))