# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1150470930 0
# Node ID a5f28e1a3fa6af1e16213abe8aa3da42437d000e
# Parent  a8804de7b167e7f5d6ce7d17ca7ddf2f43fd2692
(list-options): Put "obsolete" msg in buffer.

diff -r a8804de7b167 -r a5f28e1a3fa6 lisp/obsolete/options.el
--- a/lisp/obsolete/options.el	Fri Jun 16 15:14:40 2006 +0000
+++ b/lisp/obsolete/options.el	Fri Jun 16 15:15:30 2006 +0000
@@ -41,6 +41,8 @@
   (interactive)
   (with-output-to-temp-buffer "*List Options*"
     (let (vars)
+      (princ "This facility is obsolete; we recommend using M-x customize instead.")
+
       (mapatoms (function (lambda (sym)
 			    (if (user-variable-p sym)
 				(setq vars (cons sym vars))))))