• Home
  • History
  • Annotate
  • Raw
  • Download
  • only in /macosx-10.10.1/emacs-93/emacs/lisp/

Lines Matching +defs:list +defs:symbol

78 ;; The regular M-TAB (lisp-complete-symbol) command also supports
84 ;; list of directories in which to search for include files. Completion
127 "A list of directories in which to look for include files.
141 "A list of the environment variable names and values.")
151 (define-key read-expression-map "\e\t" 'lisp-complete-symbol)
163 (define-key global-map [remap lisp-complete-symbol] nil))
165 (define-key read-expression-map "\e\t" 'PC-lisp-complete-symbol)
189 (define-key global-map [remap lisp-complete-symbol] 'PC-lisp-complete-symbol)))))
283 `beginning-of-defun', so this would produce a list of completions
381 (defvar PC-delims-list nil)
416 ;; `PC-lisp-complete-symbol' to fail with a "Wrong type argument: sequencep, t"
493 PC-delims-list (append PC-delims nil)))
594 ;; Find an initial list of possible completions
629 ;; Build a regular expression representing the extensions list
652 ;; Now we have a list of possible completions
713 PC-delims-list)))
769 ;; If totally ambiguous, display a list of completions
776 (display-completion-list (sort helpposs 'string-lessp))
781 ;; so that choosing a completion from the list
784 ;; However, if one calls PC-lisp-complete-symbol
850 "Internal variable used by `PC-lisp-complete-symbol'.")
852 (defun PC-lisp-complete-symbol ()
853 "Perform completion on Lisp symbol preceding point.
854 That symbol is compared against the symbols that exist
857 If the symbol starts just after an open-parenthesis,
881 (symbol-plist sym))))))
910 (if (equal last-command 'PC-lisp-complete-symbol)
980 ;; list non-existent ones.
1000 (with-current-buffer (car (buffer-list))
1037 (let ((dir (with-current-buffer (car (buffer-list))
1089 ;; Make list of completions in each directory on search-path
1102 ;; Compress out duplicates while building complete list (slloooow!)