;;; options.el --- edit Options command for Emacs
-;; Copyright (C) 1985 Free Software Foundation, Inc.
+;; Copyright (C) 1985, 2001, 2002, 2003, 2004, 2005,
+;; 2006, 2007, 2008 Free Software Foundation, Inc.
;; Maintainer: FSF
;; GNU Emacs is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation; either version 2, or (at your option)
+;; the Free Software Foundation; either version 3, or (at your option)
;; any later version.
;; GNU Emacs is distributed in the hope that it will be useful,
;; You should have received a copy of the GNU General Public License
;; along with GNU Emacs; see the file COPYING. If not, write to the
-;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
-;; Boston, MA 02111-1307, USA.
+;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
;;; Commentary:
(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))))))
(setq truncate-lines t)
(setq major-mode 'Edit-options-mode)
(setq mode-name "Options")
- (run-hooks 'Edit-options-mode-hook))
+ (run-mode-hooks 'Edit-options-mode-hook))
(defun Edit-options-set () (interactive)
(Edit-options-modify
(provide 'options)
+;;; arch-tag: d18211a1-f3fb-48c9-a449-d5acde406a3c
;;; options.el ends here