Mercurial > emacs

comparison lisp/obsolete/options.el @ 71371:a5f28e1a3fa6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(list-options): Put "obsolete" msg in buffer.
author Richard M. Stallman <rms@gnu.org>
date Fri, 16 Jun 2006 15:15:30 +0000
parents e8a3fb527b77
children f7702c5f335d 138027c8c982
comparison
equal deleted inserted replaced
71370:a8804de7b167 71371:a5f28e1a3fa6
39 "Display a list of Emacs user options, with values and documentation. 39 "Display a list of Emacs user options, with values and documentation.
40 It is now better to use Customize instead." 40 It is now better to use Customize instead."
41 (interactive) 41 (interactive)
42 (with-output-to-temp-buffer "*List Options*" 42 (with-output-to-temp-buffer "*List Options*"
43 (let (vars) 43 (let (vars)
44 (princ "This facility is obsolete; we recommend using M-x customize instead.")
45
44 (mapatoms (function (lambda (sym) 46 (mapatoms (function (lambda (sym)
45 (if (user-variable-p sym) 47 (if (user-variable-p sym)
46 (setq vars (cons sym vars)))))) 48 (setq vars (cons sym vars))))))
47 (setq vars (sort vars 'string-lessp)) 49 (setq vars (sort vars 'string-lessp))
48 (while vars 50 (while vars