Mercurial > emacs
comparison lisp/isearch.el @ 76362:80b69f15b249
(isearch-message-prefix): Undo 2007-03-01 change.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Tue, 06 Mar 2007 09:19:54 +0000 |
parents | 6ad212461ddf |
children | a79dc3730ce6 738ce3540ffb 91bf6e05918b |
comparison
equal
deleted
inserted
replaced
76361:0fa44ab48cff | 76362:80b69f15b249 |
---|---|
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 (apply 'propertize | 1960 (propertize (concat (upcase (substring m 0 1)) (substring m 1)) |
1961 (concat (upcase (substring m 0 1)) (substring m 1)) | 1961 'face 'minibuffer-prompt))) |
1962 minibuffer-prompt-properties))) | |
1963 | 1962 |
1964 (defun isearch-message-suffix (&optional c-q-hack ellipsis) | 1963 (defun isearch-message-suffix (&optional c-q-hack ellipsis) |
1965 (concat (if c-q-hack "^Q" "") | 1964 (concat (if c-q-hack "^Q" "") |
1966 (if isearch-error | 1965 (if isearch-error |
1967 (concat " [" isearch-error "]") | 1966 (concat " [" isearch-error "]") |