[Emacs-diffs] Changes to emacs/lisp/woman.el

[Eli Zaretskii]

Index: emacs/lisp/woman.el
diff -c emacs/lisp/woman.el:1.36 emacs/lisp/woman.el:1.37
*** emacs/lisp/woman.el:1.36    Fri Sep  9 12:21:26 2005
--- emacs/lisp/woman.el Fri Sep  9 12:29:02 2005
***************
*** 422,430 ****
  ;;   Geoff Voelker <address@hidden>
  ;;   Eli Zaretskii <address@hidden>
  
- ;;; History:
- ;;  For recent change log see end of file.
- 
  
  ;;; 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)
  
***************
*** 1262,1271 ****
        ;; 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.
--- 1260,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.