Vladimir Zolotykh -> [email protected]  @ Thu, 26 Jan 2006 
12:50:38 +0200:

 >> VZ> (define-key isearch-mode-map [f31]
 >> VZ>   '(lambda ()
 >> VZ>      (interactive)
 >> VZ>      (if current-input-method (isearch-toggle-input-method) 
 >> (isearch-update))))
 >> VZ> (define-key isearch-mode-map [f32]
 >> VZ>   '(lambda ()
 >> VZ>      (interactive)
 >> VZ>      (if current-input-method (isearch-update) 
 >> (isearch-toggle-input-method))))
 >>
 >> VZ> C-s в Emacs-е в minibuffer просит строку поиска.
 >> VZ> Вроде бы вторая форма (второй вызов define-key) должен бы переключить 
 >> минибуфер
 >> VZ> во ввод русских букв, но вместо этого поиск просто отменяется и никакого
 >> VZ> переключения нет
 >>
 >>А кнопка передается та самая?  А то у меня с f12 работает...
 >>  
 >>
 VZ> Пришли пожалуйста как у тебя работает с f12,
 VZ> я что-то никак не могу понять в чем дело

(global-set-key [f12] '(lambda () (interactive) (inactivate-input-method)))     
; CAPS from emacs_ruslat
(global-set-key [S-f12] '(lambda () (interactive) (unless current-input-method 
(toggle-input-method)))) ; S-CAPS from emacs_ruslat
(define-key isearch-mode-map [f12] '(lambda () (interactive) (if 
current-input-method (isearch-toggle-input-method) (isearch-update))))
(define-key isearch-mode-map [S-f12] '(lambda () (interactive) (if 
current-input-method (isearch-update) (isearch-toggle-input-method))))

Работает и в stable, и в emacs-snapshot от 20050901.

-- 
Artem Chuprina
RFC2822: <ran{}ran.pp.ru> Jabber: [EMAIL PROTECTED]

Дело говоришь!
Теперь делай его.
        Кнышев.


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Ответить