formating-related fixes to `woman'

formating-related fixes to `woman'

[Emilio Lopes]

diff -rN -c old-emacs-darcs.eclig/lisp/woman.el new-emacs-darcs.eclig/lisp/woman.el
*** old-emacs-darcs.eclig/lisp/woman.el	Fri Aug 26 16:37:23 2005
--- new-emacs-darcs.eclig/lisp/woman.el	Fri Aug 26 16:36:36 2005
***************
*** 422,430 ****
  ;;   Geoff Voelker <voelker@cs.washington.edu>
  ;;   Eli Zaretskii <eliz@is.elta.co.il>
  
- ;;; History:
- ;;  For recent change log see end of file.
- 
  \f
  ;;; Code:
  
--- 422,427 ----
***************
*** 956,963 ****
      :group 'woman-faces)
  
    (defcustom woman-use-symbol-font nil
!     "*If non-nil then may use the symbol font.  It is off by default,
! mainly because it may change the line spacing (in NTEmacs 20.5)."
      :type 'boolean
      :group 'woman-faces)
  
--- 953,961 ----
      :group 'woman-faces)
  
    (defcustom woman-use-symbol-font nil
!     "*If non-nil then may use the symbol font.
! It is off by default,mainly because it may change the line spacing
! \(in NTEmacs 20.5)."
      :type 'boolean
      :group 'woman-faces)
  
***************
*** 1259,1268 ****
  	;; Unread the command event (TAB = ?\t = 9) that runs the command
  	;; `minibuffer-complete' in order to automatically complete the
  	;; minibuffer contents as far as possible.
! 	(setq unread-command-events '(9))	; and delete any type-ahead!
  	(completing-read "Manual file: " files nil 1
! 			 (try-completion "" files) 'woman-file-history)))
!       )))
  
  (defun woman-select (predicate list)
    "Select unique elements for which PREDICATE is true in LIST.
--- 1257,1265 ----
  	;; Unread the command event (TAB = ?\t = 9) that runs the command
  	;; `minibuffer-complete' in order to automatically complete the
  	;; minibuffer contents as far as possible.
! 	(setq unread-command-events '(9)) ; and delete any type-ahead!
  	(completing-read "Manual file: " files nil 1
! 			 (try-completion "" files) 'woman-file-history))))))
  
  (defun woman-select (predicate list)
    "Select unique elements for which PREDICATE is true in LIST.