diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2016-05-27 12:33:57 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2016-05-27 12:33:57 -0400 |
| commit | 84f431224cdc1ee65b4662f3eb55f4da46066e3e (patch) | |
| tree | 115c4c4637314de14d712d9be679f467f666b90a /lisp/emacs-lisp/autoload.el | |
| parent | 01f375386d74af896d427e2c6899df20c78b3850 (diff) | |
| download | emacs-84f431224cdc1ee65b4662f3eb55f4da46066e3e.tar.gz emacs-84f431224cdc1ee65b4662f3eb55f4da46066e3e.tar.bz2 emacs-84f431224cdc1ee65b4662f3eb55f4da46066e3e.zip | |
* lisp/subr.el (definition-prefixes): Expand docstring
* lisp/emacs-lisp/autoload.el (autoload--split-prefixes):
Remove unused function.
Diffstat (limited to 'lisp/emacs-lisp/autoload.el')
| -rw-r--r-- | lisp/emacs-lisp/autoload.el | 16 |
1 files changed, 7 insertions, 9 deletions
diff --git a/lisp/emacs-lisp/autoload.el b/lisp/emacs-lisp/autoload.el index 80f5c28f3ec..11316f1d9d6 100644 --- a/lisp/emacs-lisp/autoload.el +++ b/lisp/emacs-lisp/autoload.el @@ -513,15 +513,6 @@ Return non-nil in the case where no autoloads were added at point." (t (setcdr cell (cons tail (cdr cell))))))) prefixes)) -(defun autoload--split-prefixes (prefixes) - (apply #'nconc - (mapcar (lambda (cell) - (let ((prefix (car cell))) - (mapcar (lambda (cell) - (cons (concat prefix (car cell)) (cdr cell))) - (autoload--split-prefixes-1 (cdr cell))))) - prefixes))) - (defvar autoload-compute-prefixes t "If non-nil, autoload will add code to register the prefixes used in a file. Standard prefixes won't be registered anyway. I.e. if a file \"foo.el\" defines @@ -538,6 +529,13 @@ cost more memory use).") (defvar autoload-popular-prefixes nil) (defun autoload--make-defs-autoload (defs file) + ;; FIXME: avoid redundant entries. E.g. opascal currently has + ;; "opascal-" "opascal--literal-start-re" "opascal--syntax-propertize" + ;; where only the first one should be kept. + ;; FIXME: Avoid keeping too-long-prefixes. E.g. ob-scheme currently has + ;; "org-babel-scheme-" "org-babel-default-header-args:scheme" + ;; "org-babel-expand-body:scheme" "org-babel-execute:scheme". + ;; Remove the defs that obey the rule that file foo.el (or ;; foo-mode.el) uses "foo-" as prefix. ;; FIXME: help--symbol-completion-table still doesn't know how to use |