mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-24 07:20:37 +00:00
Code Issues Releases Activity

Format- and whitespace-related changes.

Browse Source
This commit is contained in:
Eli Zaretskii 2005-09-09 12:30:03 +00:00
parent f64b6c63b3
commit 9198ee0e04
2 changed files with 9 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/ChangeLog
View File

@ -1,3 +1,7 @@
2005-09-09 Emilio Lopes <eclig@gmx.net>
* woman.el: Format- and whitespace-related changes.
2005-09-09 Eli Zaretskii <eliz@gnu.org>
* woman.el: Fix my email address.

13
lisp/woman.el
View File

@ -422,9 +422,6 @@
;; Geoff Voelker <voelker@cs.washington.edu>
;; Eli Zaretskii <eliz@gnu.org>
;;; History:
;; For recent change log see end of file.
;;; Code:
@ -956,8 +953,9 @@ This is usually either black or white."
: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)."
"*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,10 +1260,9 @@ Optional argument RE-CACHE, if non-nil, forces the cache to be re-read."
;; 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!
(setq unread-command-events '(9)) ; and delete any type-ahead!
(completing-read "Manual file: " files nil 1
(try-completion "" files) 'woman-file-history)))
)))
(try-completion "" files) 'woman-file-history))))))
(defun woman-select (predicate list)
"Select unique elements for which PREDICATE is true in LIST.