diff lisp/obsolete/auto-show.el @ 34457:349d4061ceb4

Moved from auto-show.el to obsolete/auto-show.el
author Stefan Monnier <monnier@iro.umontreal.ca>
date Mon, 11 Dec 2000 21:38:46 +0000
parents
children 253f761ad37b
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/lisp/obsolete/auto-show.el	Mon Dec 11 21:38:46 2000 +0000
@@ -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 <ware@cis.ohio-state.edu>
+;;; 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
+