home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 5 Edit / 05-Edit.zip / vile-src.zip / vile-8.1 / macros / manpage.rc < prev    next >
Text File  |  1994-10-27  |  862b  |  33 lines
  1. ;;
  2. ;; Macros for obtaining manual pages and then attributing them.
  3. ;;
  4. ;; Author: Kevin Buettner
  5. ;;
  6. ;; $Header: /usr/build/vile/vile/macros/RCS/manpage.rc,v 1.1 1994/10/27 14:28:04 tom Exp $
  7. ;;
  8.  
  9. 29 store-macro
  10.     set-variable %manpage @"man page? "
  11.     ~if &or &seq %manpage "ERROR" & seq %manpage ""
  12.         ~return
  13.     ~endif
  14.     set-variable %manpagebuf &cat "<" &cat %manpage ">"
  15.     set terse
  16.     ~force select-buffer %manpagebuf
  17.     ~if ¬ $status
  18.         edit-file &cat "!man " &cat %manpage " | vile-manfilt"
  19.         ~force rename-buffer %manpagebuf
  20.         ~force error-buffer %manpagebuf
  21.         write-message "[Attaching bold and underline attributes...]"
  22.         goto-beginning-of-file
  23.         setl noview
  24.         attribute-cntl_a-sequences-til end-of-file
  25.         unmark-buffer
  26.         setl view
  27.         goto-beginning-of-file
  28.         write-message "[Done formatting manual page.]"
  29.     ~endif
  30.     set noterse
  31. ~endm
  32. bind-key execute-macro-29 ^X-m
  33.