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 <[EMAIL PROTECTED]>
;; Eli Zaretskii <[EMAIL PROTECTED]>
- ;;; 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)
***************
*** 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.
_______________________________________________
Emacs-devel mailing list
Emacs-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-devel
