comparison lisp/allout.el @ 3549:a4d9c9bc3994

(outlinify-sticky): Renamed from outlineify-sticky.
author Richard M. Stallman <rms@gnu.org>
date Mon, 07 Jun 1993 18:48:08 +0000
parents 400db0ca934f
children 507f64624555
comparison
equal deleted inserted replaced
3548:54b82ecde27b 3549:a4d9c9bc3994
9 ;;;_ + Package Identification Stuff 9 ;;;_ + Package Identification Stuff
10 10
11 ;;;_ - Author: Ken Manheimer <klm@nist.gov> 11 ;;;_ - Author: Ken Manheimer <klm@nist.gov>
12 ;;;_ - Maintainer: Ken Manheimer <klm@nist.gov> 12 ;;;_ - Maintainer: Ken Manheimer <klm@nist.gov>
13 ;;;_ - Created: Dec 1991 - first release to usenet 13 ;;;_ - Created: Dec 1991 - first release to usenet
14 ;;;_ - Version: $Id: allout.el,v 3.6 1993/06/01 21:30:47 klm Exp $|| 14 ;;;_ - Version: $Id: allout.el,v 1.1 1993/06/02 17:53:31 rms Exp rms $||
15 ;;;_ - Keywords: outline mode 15 ;;;_ - Keywords: outline mode
16 16
17 ;;;_ - LCD Archive Entry 17 ;;;_ - LCD Archive Entry
18 18
19 ;; LCD Archive Entry: 19 ;; LCD Archive Entry:
20 ;; allout|Ken Manheimer|klm@nist.gov 20 ;; allout|Ken Manheimer|klm@nist.gov
21 ;; |A more thorough outline-mode 21 ;; |A more thorough outline-mode
22 ;; |27-May-1993|$Id: allout.el,v 3.4 1993/05/27 19:24:19 klm Exp $|| 22 ;; |27-May-1993|$Id: allout.el,v 1.1 1993/06/02 17:53:31 rms Exp rms $||
23 23
24 ;;;_ - Description 24 ;;;_ - Description
25 ;; A full-fledged outline mode, based on the original rudimentary 25 ;; A full-fledged outline mode, based on the original rudimentary
26 ;; GNU emacs outline functionality. 26 ;; GNU emacs outline functionality.
27 ;; 27 ;;
577 C-c @ outline-resolve-xref pop-to-buffer named by xref (cf 577 C-c @ outline-resolve-xref pop-to-buffer named by xref (cf
578 outline-file-xref-bullet) 578 outline-file-xref-bullet)
579 C-c c outline-copy-exposed Copy outline sans all hidden stuff to 579 C-c c outline-copy-exposed Copy outline sans all hidden stuff to
580 another buffer whose name is derived 580 another buffer whose name is derived
581 from the current one - \"XXX exposed\" 581 from the current one - \"XXX exposed\"
582 M-x outlineify-sticky Activate outline mode for current buffer 582 M-x outlinify-sticky Activate outline mode for current buffer
583 and establish -*- outline -*- mode specifier 583 and establish -*- outline -*- mode specifier
584 as well as file local vars to automatically 584 as well as file local vars to automatically
585 set exposure. Try it. 585 set exposure. Try it.
586 586
587 Terminology 587 Terminology
2467 (insert-buffer buf) 2467 (insert-buffer buf)
2468 (replace-regexp "\^M[^\^M\^J]*" "") 2468 (replace-regexp "\^M[^\^M\^J]*" "")
2469 (goto-char (point-min)) 2469 (goto-char (point-min))
2470 ) 2470 )
2471 ) 2471 )
2472 ;;;_ > outlineify-sticky () 2472 ;;;_ > outlinify-sticky ()
2473 (defun outlineify-sticky (&optional arg) 2473 (defun outlinify-sticky (&optional arg)
2474 " Activate outline mode and establish file eval to set initial exposure. 2474 " Activate outline mode and establish file eval to set initial exposure.
2475 2475
2476 Invoke with a string argument to designate a string to prepend to 2476 Invoke with a string argument to designate a string to prepend to
2477 topic prefixs, or with a universal argument to be prompted for the 2477 topic prefixs, or with a universal argument to be prompted for the
2478 string to be used. Suitable defaults are provided for lisp, 2478 string to be used. Suitable defaults are provided for lisp,