Re: Isearch - Incremental search with predefined initial character?

[BobD]

I want a conditional substitute for the normal isearch, depending on which key 
I use to start the search.
Always using the same prefix is OK; I use "{".

After fiddling a while, I came up with this, which does what I want.
I bind [lwindow] to isearch-forward and isearch-repeat-forward.
In the isearch-mode-hook function, I yank a "{" if [lwindow] started the search.
([lwindow] is the left-side Windows key on keyboards made for Windows.)


(defvar my-prefix "{" "My Isearch prefix")              ;My one-char prefix

(defun rjd-prebrace ()                                                          
;Function for isearch-mode-hook
  (if (equal (this-command-keys) [lwindow])                     ;If invoked by 
[lwindow]
    (isearch-yank-string my-prefix)                                     ;  yank 
the prefix
  )
)

(add-hook 'isearch-mode-hook 'rjd-prebrace)                     ;Plant function 
in hook list

(global-set-key [lwindow] 'isearch-forward)                     ;Plant key in 
maps (Only forward direction)
(define-key isearch-mode-map [lwindow] 'isearch-repeat-forward)


Thank you very much for your help.  Pointing me at (isearch-yank-string ...) 
made this work.

I wish to do this so that I can search for "{abc" without typing the "{" first. 
 Typing something like "\C-s{abc" is exhausting.