Re: [Blinux-rus] Russian input feedback in Emacspeak
Здравствуйте! Дмитрий == Дмитрий Падучих dpad...@k66.ru writes: Дмитрий Мне вообще не очень понятно, зачем была нужна эта Дмитрий фича. Но если уж её делать, то лучше написать так: Дмитрий (dtk-speak (key-description ad-return-value)) Дмитрий Иначе на C-SPC, например, вы получите [67108896]. А как бы это можно было бы проверить? С уважением, Игорь. -- Blinux-rus mailing list Blinux-rus@lists.a11ywiki.org http://www.a11ywiki.org/cgi-bin/mailman/listinfo/blinux-rus
Re: [Blinux-rus] Russian input feedback in Emacspeak
Igor B. Poretsky: (dtk-speak (key-description ad-return-value)) Иначе на C-SPC, например, вы получите [67108896]. IP А как бы это можно было бы проверить? Например, набрать в *scratch*: (read-key-sequence Press: ) C-j и нажать C-SPC. В иксах получается [67108896]. Если хотите послушать, как это проговаривает адвайс, наберите: (prog1 (read-key-sequence Press: ) (sit-for 11)) C-j -- Дмитрий Падучих -- Blinux-rus mailing list Blinux-rus@lists.a11ywiki.org http://www.a11ywiki.org/cgi-bin/mailman/listinfo/blinux-rus
Re: [Blinux-rus] Russian input feedback in Emacspeak
Igor B. Poretsky: IP Я выяснил, что речевому серверу при включенном русском вводе помимо IP обычных команд типа l для обеспечения эха ввода посылаются еще и IP последовательности команд q и d для произношения оригинальных IP названий клавиш. Очень бы хотелось избавиться от этой пакости. Быть IP может, кто-нибудь что-нибудь полезное подскажет? Как и где бы найти IP источник? Попробуйте вычислить приведённые ниже выражения и поэкспериментировать со вводом русского текста в буфере TEST (большими буквами). В результате на каждый вызов dtk-speak у вас будет бэктрейс в переменной my-dtk-speak-trace. Вы эту переменную потом посмотрите и узнаете, откуда идут вызовы dtk-speak. Надеюсь, что результатами поделитесь, мне тоже было бы интересно узнать, в чём дело. У меня этого нет. (defvar my-dtk-speak-trace nil) (defadvice dtk-speak (after trace pre act comp) (when (string= (buffer-name) TEST) (let ((n 1) (frame nil) (trace nil)) (setq frame (backtrace-frame n)) (while frame (push frame trace) (setq n (+ n 1)) (setq frame (backtrace-frame n))) (push trace my-dtk-speak-trace -- Дмитрий Падучих -- Blinux-rus mailing list Blinux-rus@lists.a11ywiki.org http://www.a11ywiki.org/cgi-bin/mailman/listinfo/blinux-rus
Re: [Blinux-rus] Russian input feedback in Emacspeak
Здравствуйте! Дмитрий == Дмитрий Падучих dpad...@k66.ru writes: Дмитрий В версии Emacspeak из Subversion этот вызов уже Дмитрий закомментирован: Дмитрий (defadvice read-key-sequence(around emacspeak pre act ) Весь? А зачем? Его ведь достаточно лишь слегка подправить, что я уже и сделал. И заплатку сейчас выложу. С уважением, Игорь. -- Blinux-rus mailing list Blinux-rus@lists.a11ywiki.org http://www.a11ywiki.org/cgi-bin/mailman/listinfo/blinux-rus
Re: [Blinux-rus] Russian input feedback in Emacspeak
Igor B. Poretsky: В версии Emacspeak из Subversion этот вызов уже закомментирован: (defadvice read-key-sequence(around emacspeak pre act ) IP Весь? А зачем? Его ведь достаточно лишь слегка подправить, что я уже и IP сделал. И заплатку сейчас выложу. Мне вообще не очень понятно, зачем была нужна эта фича. Но если уж её делать, то лучше написать так: (dtk-speak (key-description ad-return-value)) Иначе на C-SPC, например, вы получите [67108896]. -- Дмитрий Падучих -- Blinux-rus mailing list Blinux-rus@lists.a11ywiki.org http://www.a11ywiki.org/cgi-bin/mailman/listinfo/blinux-rus