comparison lisp/allout.el @ 83072:b1f57ac99be5

Merged in changes from CVS HEAD Patches applied: * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-126 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-127 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-128 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-129 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-130 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-131 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-132 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-133 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-134 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-135 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-136 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-137 Update from CVS git-archimport-id: [e-mail]--2004/emacs--multi-tty--0--patch-112

83071:3edf0340391b

;; Copyright (C) 1992, 1993, 1994, 2001, 2002 Free Software Foundation, Inc.

;; Author: Ken Manheimer <[e-mail]>
;; Maintainer: Ken Manheimer <[e-mail]>
;; Created: Dec 1991 - first release to usenet
;; Version: $Id: allout.el,v 1.45 2003/10/16 16:28:30 eliz Exp $||
;; Keywords: outlines mode wp languages

;; This file is part of GNU Emacs.

;; GNU Emacs is free software; you can redistribute it and/or modify

;;;_ #1 Internal Outline Formatting and Configuration
;;;_  : Version
;;;_   = allout-version
(defvar allout-version
  (let ((rcs-rev "$Revision: 1.45 $"))
    (condition-case err
	(save-match-data
	  (string-match "Revision: \\([0-9]+\\.[0-9]+\\)" rcs-rev)
	  (substring rcs-rev (match-beginning 1) (match-end 1)))
      ('error rcs-rev)))

Third arg NUMBER-CONTROL can force the prefix to or away from
numbered form.  It has effect only if `allout-numbered-bullet' is
non-nil and soliciting was not explicitly invoked (via first arg).
Its effect, numbering or denumbering, then depends on the setting
of the forth arg, INDEX.

If NUMBER-CONTROL is non-nil and forth arg INDEX is nil, then the
prefix of the topic is forced to be non-numbered.  Null index and
non-nil NUMBER-CONTROL forces denumbering.  Non-nil INDEX (and
non-nil NUMBER-CONTROL) forces a numbered-prefix form.  If non-nil
INDEX is a number, then that number is used for the numbered
prefix.  Non-nil and non-number means that the index for the

83072:b1f57ac99be5

;; Copyright (C) 1992, 1993, 1994, 2001, 2002 Free Software Foundation, Inc.

;; Author: Ken Manheimer <[e-mail]>
;; Maintainer: Ken Manheimer <[e-mail]>
;; Created: Dec 1991 - first release to usenet
;; Version: $Id: allout.el,v 1.46 2004/03/01 22:44:04 lektu Exp $||
;; Keywords: outlines mode wp languages

;; This file is part of GNU Emacs.

;; GNU Emacs is free software; you can redistribute it and/or modify

;;;_ #1 Internal Outline Formatting and Configuration
;;;_  : Version
;;;_   = allout-version
(defvar allout-version
  (let ((rcs-rev "$Revision: 1.46 $"))
    (condition-case err
	(save-match-data
	  (string-match "Revision: \\([0-9]+\\.[0-9]+\\)" rcs-rev)
	  (substring rcs-rev (match-beginning 1) (match-end 1)))
      ('error rcs-rev)))

Third arg NUMBER-CONTROL can force the prefix to or away from
numbered form.  It has effect only if `allout-numbered-bullet' is
non-nil and soliciting was not explicitly invoked (via first arg).
Its effect, numbering or denumbering, then depends on the setting
of the fourth arg, INDEX.

If NUMBER-CONTROL is non-nil and fourth arg INDEX is nil, then the
prefix of the topic is forced to be non-numbered.  Null index and
non-nil NUMBER-CONTROL forces denumbering.  Non-nil INDEX (and
non-nil NUMBER-CONTROL) forces a numbered-prefix form.  If non-nil
INDEX is a number, then that number is used for the numbered
prefix.  Non-nil and non-number means that the index for the