1995-10-30 17:35:01 +00:00
|
|
|
;;; auto-show.el --- perform automatic horizontal scrolling as point moves
|
1995-03-12 09:15:08 +00:00
|
|
|
;;; This file is in the public domain.
|
1995-03-12 09:05:52 +00:00
|
|
|
|
2001-07-15 16:15:35 +00:00
|
|
|
;; This file is part of GNU Emacs.
|
|
|
|
|
|
|
|
;; Keywords: scroll display convenience
|
|
|
|
;; Author: Pete Ware <ware@cis.ohio-state.edu>
|
|
|
|
;; Maintainer: FSF
|
1995-03-12 09:15:08 +00:00
|
|
|
|
|
|
|
;;; Commentary:
|
|
|
|
|
1999-09-06 16:01:22 +00:00
|
|
|
;; This file contains dummy variables and functions only because Emacs
|
|
|
|
;; does hscrolling automatically, now.
|
1995-03-12 09:05:52 +00:00
|
|
|
|
1995-03-12 09:15:08 +00:00
|
|
|
;;; Code:
|
1995-03-12 09:05:52 +00:00
|
|
|
|
1997-12-10 11:24:33 +00:00
|
|
|
(defgroup auto-show nil
|
2000-02-23 14:52:41 +00:00
|
|
|
"This customization group is kept for compatibility only.
|
1999-09-06 16:01:22 +00:00
|
|
|
Emacs now does hscrolling automatically. Please remove references
|
2000-02-23 14:52:41 +00:00
|
|
|
to auto-show from your init file and code."
|
1997-12-10 11:24:33 +00:00
|
|
|
:group 'editing)
|
|
|
|
|
1999-06-04 18:40:43 +00:00
|
|
|
;;;###autoload
|
|
|
|
(defcustom auto-show-mode nil
|
1999-09-06 16:01:22 +00:00
|
|
|
"Obsolete."
|
1999-06-04 18:40:43 +00:00
|
|
|
:version "20.4"
|
1997-12-10 11:24:33 +00:00
|
|
|
:type 'boolean
|
|
|
|
:group 'auto-show)
|
1995-03-12 09:05:52 +00:00
|
|
|
|
2003-02-04 13:24:35 +00:00
|
|
|
(defcustom auto-show-shift-amount 8
|
1999-09-06 16:01:22 +00:00
|
|
|
"*Obsolete."
|
1997-12-10 11:24:33 +00:00
|
|
|
:type 'integer
|
|
|
|
:group 'auto-show)
|
1995-03-12 09:05:52 +00:00
|
|
|
|
1997-12-10 11:24:33 +00:00
|
|
|
(defcustom auto-show-show-left-margin-threshold 50
|
1999-09-06 16:01:22 +00:00
|
|
|
"*Obsolete."
|
1997-12-10 11:24:33 +00:00
|
|
|
:type 'integer
|
|
|
|
:group 'auto-show)
|
1995-03-12 09:05:52 +00:00
|
|
|
|
1995-03-12 09:15:08 +00:00
|
|
|
;;;###autoload
|
|
|
|
(defun auto-show-mode (arg)
|
1999-09-06 19:49:33 +00:00
|
|
|
"This command is obsolete."
|
1999-09-06 16:01:22 +00:00
|
|
|
(interactive "P"))
|
2003-02-04 13:24:35 +00:00
|
|
|
|
1995-03-12 09:05:52 +00:00
|
|
|
(defun auto-show-make-point-visible (&optional ignore-arg)
|
1999-09-06 19:49:33 +00:00
|
|
|
"This command is obsolete."
|
1999-09-06 16:01:22 +00:00
|
|
|
(interactive))
|
1995-03-12 09:15:08 +00:00
|
|
|
|
|
|
|
(provide 'auto-show)
|
1995-03-12 09:05:52 +00:00
|
|
|
|
2003-09-01 15:45:59 +00:00
|
|
|
;;; arch-tag: 49587cbf-95cc-4061-b564-274aaec37469
|
2001-07-15 16:15:35 +00:00
|
|
|
;;; auto-show.el ends here
|