Mercurial > emacs

annotate lisp/obsolete/auto-show.el @ 69185:ee54b3a792ff

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
This version does *not* work with Emacs 22. It is just the initial import from gpm-1.20.1.
author Nick Roberts <nickrob@snap.net.nz>
date Mon, 27 Feb 2006 22:10:43 +0000
parents 695cf19ef79e
children 375f2633d815 1e3a407766b9
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
34457
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
1 ;;; auto-show.el --- perform automatic horizontal scrolling as point moves
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
2 ;;; This file is in the public domain.
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
3
38412
253f761ad37b Some fixes to follow coding conventions in files maintained by FSF.
Pavel Janík <Pavel@Janik.cz>
parents: 34457
diff changeset
4 ;; This file is part of GNU Emacs.
253f761ad37b Some fixes to follow coding conventions in files maintained by FSF.
Pavel Janík <Pavel@Janik.cz>
parents: 34457
diff changeset
5
253f761ad37b Some fixes to follow coding conventions in files maintained by FSF.
Pavel Janík <Pavel@Janik.cz>
parents: 34457
diff changeset
6 ;; Keywords: scroll display convenience
253f761ad37b Some fixes to follow coding conventions in files maintained by FSF.
Pavel Janík <Pavel@Janik.cz>
parents: 34457
diff changeset
7 ;; Author: Pete Ware <ware@cis.ohio-state.edu>
253f761ad37b Some fixes to follow coding conventions in files maintained by FSF.
Pavel Janík <Pavel@Janik.cz>
parents: 34457
diff changeset
8 ;; Maintainer: FSF
34457
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
9
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
10 ;;; Commentary:
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
11
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
12 ;; This file contains dummy variables and functions only because Emacs
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
13 ;; does hscrolling automatically, now.
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
14
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
15 ;;; Code:
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
16
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
17 (defgroup auto-show nil
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
18 "This customization group is kept for compatibility only.
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
19 Emacs now does hscrolling automatically. Please remove references
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
20 to auto-show from your init file and code."
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
21 :group 'editing)
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
22
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
23 ;;;###autoload
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
24 (defcustom auto-show-mode nil
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
25 "Obsolete."
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
26 :version "20.4"
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
27 :type 'boolean
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
28 :group 'auto-show)
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
29
49598
0d8b17d428b5 Trailing whitepace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 38412
diff changeset
30 (defcustom auto-show-shift-amount 8
34457
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
31 "*Obsolete."
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
32 :type 'integer
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
33 :group 'auto-show)
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
34
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
35 (defcustom auto-show-show-left-margin-threshold 50
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
36 "*Obsolete."
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
37 :type 'integer
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
38 :group 'auto-show)
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
39
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
40 ;;;###autoload
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
41 (defun auto-show-mode (arg)
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
42 "This command is obsolete."
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
43 (interactive "P"))
49598
0d8b17d428b5 Trailing whitepace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 38412
diff changeset
44
34457
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
45 (defun auto-show-make-point-visible (&optional ignore-arg)
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
46 "This command is obsolete."
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
47 (interactive))
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
48
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
49 (provide 'auto-show)
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
50
52401
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 49598
diff changeset
51 ;;; arch-tag: 49587cbf-95cc-4061-b564-274aaec37469
38412
253f761ad37b Some fixes to follow coding conventions in files maintained by FSF.
Pavel Janík <Pavel@Janik.cz>
parents: 34457
diff changeset
52 ;;; auto-show.el ends here