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 <[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)
***************
*** 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.
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
