Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-16 17:24:23 +00:00
Code Issues Projects Releases Packages Wiki Activity

(add-to-list): Always return updated value of LIST-VAR.

Browse source
This commit is contained in:
Karl Heuer 1998-04-07 18:22:28 +00:00
parent 912ec20a41
commit 15171a06d3
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/subr.el
View file

@ -664,8 +664,9 @@ until a certain package is loaded, you should put the call to `add-to-list'
into a hook function that will be run only after loading the package.
`eval-after-load' provides one way to do this. In some cases
other hooks, such as major mode hooks, can do the job."
(or (member element (symbol-value list-var))
(set list-var (cons element (symbol-value list-var)))))
(if (member element (symbol-value list-var))
(symbol-value list-var)
(set list-var (cons element (symbol-value list-var)))))
;;;; Specifying things to do after certain files are loaded.