From 4b0cd42df2ba0b4e30efb32743f6fd9db6f0585f Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Mon, 11 Dec 2000 21:39:52 +0000 Subject: Moved from auto-show.el to obsolete/auto-show.el --- lisp/ChangeLog | 4 +++- lisp/auto-show.el | 50 ---------------------------------------------- lisp/obsolete/auto-show.el | 50 ++++++++++++++++++++++++++++++++++++++++++++++ 3 files changed, 53 insertions(+), 51 deletions(-) delete mode 100644 lisp/auto-show.el create mode 100644 lisp/obsolete/auto-show.el diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e9ea44a281a..635a40d30aa 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,6 +1,8 @@ 2000-12-11 Stefan Monnier - * obsolete/c-mode.el: Moved from progmodes. + * obsolete/c-mode.el: Moved from lisp/progmodes. + * obsolete/auto-show.el: Moved from lisp. + * obsolete/ooutline.el: Moved from lisp/textmodes. 2000-12-11 Carsten Dominik diff --git a/lisp/auto-show.el b/lisp/auto-show.el deleted file mode 100644 index 93323f6c8c1..00000000000 --- a/lisp/auto-show.el +++ /dev/null @@ -1,50 +0,0 @@ -;;; auto-show.el --- perform automatic horizontal scrolling as point moves -;;; This file is in the public domain. - -;;; Keywords: scroll display convenience -;;; Author: Pete Ware -;;; Maintainer: FSF - -;;; Commentary: - -;; This file contains dummy variables and functions only because Emacs -;; does hscrolling automatically, now. - -;;; Code: - -(defgroup auto-show nil - "This customization group is kept for compatibility only. -Emacs now does hscrolling automatically. Please remove references -to auto-show from your init file and code." - :group 'editing) - -;;;###autoload -(defcustom auto-show-mode nil - "Obsolete." - :version "20.4" - :type 'boolean - :group 'auto-show) - -(defcustom auto-show-shift-amount 8 - "*Obsolete." - :type 'integer - :group 'auto-show) - -(defcustom auto-show-show-left-margin-threshold 50 - "*Obsolete." - :type 'integer - :group 'auto-show) - -;;;###autoload -(defun auto-show-mode (arg) - "This command is obsolete." - (interactive "P")) - -(defun auto-show-make-point-visible (&optional ignore-arg) - "This command is obsolete." - (interactive)) - -(provide 'auto-show) - -;; auto-show.el ends here - diff --git a/lisp/obsolete/auto-show.el b/lisp/obsolete/auto-show.el new file mode 100644 index 00000000000..93323f6c8c1 --- /dev/null +++ b/lisp/obsolete/auto-show.el @@ -0,0 +1,50 @@ +;;; auto-show.el --- perform automatic horizontal scrolling as point moves +;;; This file is in the public domain. + +;;; Keywords: scroll display convenience +;;; Author: Pete Ware +;;; Maintainer: FSF + +;;; Commentary: + +;; This file contains dummy variables and functions only because Emacs +;; does hscrolling automatically, now. + +;;; Code: + +(defgroup auto-show nil + "This customization group is kept for compatibility only. +Emacs now does hscrolling automatically. Please remove references +to auto-show from your init file and code." + :group 'editing) + +;;;###autoload +(defcustom auto-show-mode nil + "Obsolete." + :version "20.4" + :type 'boolean + :group 'auto-show) + +(defcustom auto-show-shift-amount 8 + "*Obsolete." + :type 'integer + :group 'auto-show) + +(defcustom auto-show-show-left-margin-threshold 50 + "*Obsolete." + :type 'integer + :group 'auto-show) + +;;;###autoload +(defun auto-show-mode (arg) + "This command is obsolete." + (interactive "P")) + +(defun auto-show-make-point-visible (&optional ignore-arg) + "This command is obsolete." + (interactive)) + +(provide 'auto-show) + +;; auto-show.el ends here + -- cgit v1.2.3