Mercurial > emacs

annotate lisp/obsolete/auto-show.el @ 41266:c08a55ae8e5d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(calc-wrapper, calc-slow-wrapper) (math-showing-full-precision, math-with-extra-prec, math-working) (calc-with-default-simplification) (calc-with-trail-buffer): Use backtick. (Math-zerop, Math-integer-negp, Math-integer-posp, Math-negp) (Math-looks-negp, Math-posp, Math-integerp, Math-natnump) (Math-ratp, Math-realp, Math-anglep, Math-numberp, Math-scalarp) (Math-vectorp, Math-messy-integerp, Math-objectp, Math-objvecp) (Math-integer-neg, Math-equal, Math-lessp, Math-primp) (Math-num-integerp, Math-bignum-test, Math-equal-int) (Math-natnum-lessp, math-format-radix-digit): Change to `defsubst'. (calc-record-compilation-date-macro): Deleted. Callers updated. (math-format-radix-digit): Move to calc-bin.el. Change all toplevel `setq' forms to `defvar' forms, and move them before their first use. Use `when', `unless'. Remove trailing periods from error forms. Add description and headers suggested by Emacs Lisp coding conventions.
author Colin Walters <walters@gnu.org>
date Mon, 19 Nov 2001 07:35:49 +0000
parents 253f761ad37b
children 0d8b17d428b5
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
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
30 (defcustom auto-show-shift-amount 8
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"))
349d4061ceb4 Moved from auto-show.el to obsolete/auto-show.el
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
diff changeset
44
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
38412
253f761ad37b Some fixes to follow coding conventions in files maintained by FSF.
Pavel Janík <Pavel@Janik.cz>
parents: 34457
diff changeset
51 ;;; auto-show.el ends here