Mercurial > emacs

comparison lisp/isearch.el @ 83559:edf631bdbb7a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merged from emacs@sv.gnu.org Patches applied: * emacs@sv.gnu.org/emacs--devo--0--patch-650 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-651 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-652 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-653 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-654 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-655 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-656 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-657 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-658 Merge from gnus--rel--5.10 * emacs@sv.gnu.org/emacs--devo--0--patch-659 Update from CVS * emacs@sv.gnu.org/gnus--rel--5.10--patch-203 Merge from emacs--devo--0 * emacs@sv.gnu.org/gnus--rel--5.10--patch-204 Update from CVS * emacs@sv.gnu.org/gnus--rel--5.10--patch-205 Update from CVS git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-599
author Karoly Lorentey <karoly@lorentey.hu>
date Sun, 22 Apr 2007 11:42:03 +0000
parents 07774e5c3ff5 6ad212461ddf
children 738ce3540ffb
comparison
equal deleted inserted replaced
83558:8e46638e99c7 83559:edf631bdbb7a
1955 (if isearch-forward "" " backward") 1955 (if isearch-forward "" " backward")
1956 (if current-input-method 1956 (if current-input-method
1957 (concat " [" current-input-method-title "]: ") 1957 (concat " [" current-input-method-title "]: ")
1958 ": ") 1958 ": ")
1959 ))) 1959 )))
1960 (propertize (concat (upcase (substring m 0 1)) (substring m 1)) 1960 (apply 'propertize
1961 'face 'minibuffer-prompt))) 1961 (concat (upcase (substring m 0 1)) (substring m 1))
1962 minibuffer-prompt-properties)))
1962 1963
1963 (defun isearch-message-suffix (&optional c-q-hack ellipsis) 1964 (defun isearch-message-suffix (&optional c-q-hack ellipsis)
1964 (concat (if c-q-hack "^Q" "") 1965 (concat (if c-q-hack "^Q" "")
1965 (if isearch-error 1966 (if isearch-error
1966 (concat " [" isearch-error "]") 1967 (concat " [" isearch-error "]")