[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/allout.el
From: |
Nick Roberts |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/allout.el |
Date: |
Sun, 01 May 2005 09:43:21 -0400 |
Index: emacs/lisp/allout.el
diff -c emacs/lisp/allout.el:1.52 emacs/lisp/allout.el:1.53
*** emacs/lisp/allout.el:1.52 Wed Feb 9 15:50:43 2005
--- emacs/lisp/allout.el Sun May 1 13:43:20 2005
***************
*** 3975,3992 ****
Cursor is left at start position.
- Use this instead of obsolete `allout-exposure'.
-
Examples:
! \(allout-exposure (-1 () () () 1) 0)
Close current topic at current level so only the immediate
subtopics are shown, except also show the children of the
third subtopic; and close the next topic at the current level.
! \(allout-exposure : -1 0)
Close all topics at current level to expose only their
immediate children, except for the last topic at the current
level, in which even its immediate children are hidden.
! \(allout-exposure -2 : -1 *)
Expose children and grandchildren of first topic at current
level, and expose children of subsequent topics at current
level *except* for the last, which should be opened completely."
--- 3975,3990 ----
Cursor is left at start position.
Examples:
! \(allout-new-exposure (-1 () () () 1) 0)
Close current topic at current level so only the immediate
subtopics are shown, except also show the children of the
third subtopic; and close the next topic at the current level.
! \(allout-new-exposure : -1 0)
Close all topics at current level to expose only their
immediate children, except for the last topic at the current
level, in which even its immediate children are hidden.
! \(allout-new-exposure -2 : -1 *)
Expose children and grandchildren of first topic at current
level, and expose children of subsequent topics at current
level *except* for the last, which should be opened completely."
***************
*** 3995,4011 ****
(allout-next-heading)))
(error "allout-new-exposure: Can't find any outline topics"))
(list 'allout-expose-topic (list 'quote spec))))
- ;;;_ > allout-exposure '()
- (defmacro allout-exposure (&rest spec)
- "Literal frontend for `allout-old-expose-topic', doesn't evaluate arguments
- and retains start position."
- (list 'save-excursion
- '(if (not (or (allout-goto-prefix)
- (allout-next-heading)))
- (error "Can't find any outline topics"))
- (cons 'allout-old-expose-topic
- (mapcar (function (lambda (x) (list 'quote x))) spec))))
- (make-obsolete 'allout-exposure 'allout-new-exposure "19.23")
;;;_ #7 Systematic outline presentation - copying, printing, flattening
--- 3993,3998 ----
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/allout.el,
Nick Roberts <=