June 2001 - XEmacs-Users-ru - XEmacs Mailing List Archives

к вопросу об Alt-U/Alt-L/Alt-C в мульном XEmacs'е 24 years

Alexey Mahotkin

Приложите вот такой патч к lisp/mule/cyrillic.el. Надеюсь, оно или его модификация попадет в стандартный XEmacs: --- cyrillic.el 2001/06/14 19:03:59 1.2 +++ cyrillic.el 2001/06/14 19:27:41 ＠＠ -337,4 +337,69 ＠＠ (documentation . "Support for Cyrillic ALTERNATIVNYJ.")) '("Cyrillic")) +;; +;; Setup case table +;; + +;; FIXME: this defun is cut-and-pasted from mule/latin.el +(defun setup-case-pairs (charset pairs) + (let ((tbl (standard-case-table))) + (loop for (uc lc) in pairs do + (put-case-table-pair (make-char charset uc) (make-char charset lc) tbl)))) + +(setup-case-pairs + 'cyrillic-iso8859-5 + '( + (176 208) ;cyrillic letter a + (167 247) ;cyrillic letter yi + (205 237) ;cyrillic letter e + (174 254) ;cyrillic letter short u + (177 209) ;cyrillic letter be + (197 229) ;cyrillic letter ha + (184 216) ;cyrillic letter i + (180 212) ;cyrillic letter de + (198 230) ;cyrillic letter tse + (206 238) ;cyrillic letter yu + (190 222) ;cyrillic letter o + (168 248) ;cyrillic letter je + (202 234) ;cyrillic letter hard sign + (199 231) ;cyrillic letter che + (164 244) ;cyrillic letter ukrainian ie + (162 242) ;cyrillic letter dje + (179 211) ;cyrillic letter ghe + (195 227) ;cyrillic letter u + (191 223) ;cyrillic letter pe + (163 243) ;cyrillic letter gje + (194 226) ;cyrillic letter te + (172 252) ;cyrillic letter kje + (178 210) ;cyrillic letter ve + (169 249) ;cyrillic letter lje + (200 232) ;cyrillic letter sha + (170 250) ;cyrillic letter nje + (183 215) ;cyrillic letter ze + (165 245) ;cyrillic letter dze + (203 235) ;cyrillic letter yeru + (201 233) ;cyrillic letter shcha + (182 214) ;cyrillic letter zhe + (175 255) ;cyrillic letter dzhe + (196 228) ;cyrillic letter ef + (186 218) ;cyrillic letter ka + (204 236) ;cyrillic letter soft sign + (181 213) ;cyrillic letter ie + (187 219) ;cyrillic letter el + (188 220) ;cyrillic letter em + (189 221) ;cyrillic letter en + (171 251) ;cyrillic letter tshe + (192 224) ;cyrillic letter er + (161 241) ;cyrillic letter io + (166 246) ;cyrillic letter byelorussian-ukrainian i + (193 225) ;cyrillic letter es + (185 217) ;cyrillic letter short i + (207 239) ;cyrillic letter ya + )) + +;; This is our utility function; we don't want it in the dumped XEmacs. + +(fmakunbound 'setup-case-pairs) + ;;; cyrillic.el ends here --alexm

1 participants
0 comments

ru-keys.el-0.3.1 24 years

Andrew W. Nosenko

Новую версию можно загрузить с: http://www.bcs.zp.ua/~awn/xemacs/ru-keys.el ;; Changes 0.3 -> 0.3.1: ;; o Fix typos and bad english phrases. ;; (From Mikhail Yakshin <yakshin(a)online.ru>) ;; o Some words about `ctl-arrow' is added into "How to install" notes. ;; o Provide default bindings (to `ru-keys-noop') for following keysyms: ;; ;; [iso-next-group] ;; [(control iso-next-group)] ;; [(meta iso-next-group)] ;; [(control meta iso-next-group)] ;; ;; [iso-prev-group] ;; [(control iso-prev-group)] ;; [(meta iso-prev-group)] ;; [(control meta iso-prev-group)] ;; ;; [iso-first-group] ;; [(control iso-first-group)] ;; [(meta iso-first-group)] ;; [(control meta iso-first-group)] ;; ;; `ru-keys-noop' designed especially for do-nothing but don't abort ;; isearches. -- Andrew W. Nosenko (awn(a)bcs.zp.ua) Фамильный призрак (c) Елена Носенко

1 participants
0 comments

Re: dired + russian 24 years

Alexandre N. Safiullin

>>>>> "Serge" == Serge Olkhowik <serge(a)atlantis.com.ua> writes: >> а я так понимаю, что для не китаёзов Mule вообще не нужен. Serge> угу - тексты и мессаги в win1251? да ну, типа если бы мульный Xemacs автоматом отображал такую мессагу нормально... а ведь все равно надо какие-то танцы с бубном делать.. всякие там coding-system .. мне проще в гнусе нажать "| xcode" и все будет автоматом перекодировано в koi8, и не важно, пришло оно в cp1251 или cp866. >> Меня, например, не прикалывает иметь разные комбинации клавиш >> для переключения на русский в Xemacs'е и вне его. Serge> xkb что xkb? у меня xkb и стоит. Но ведь в мульный xemacs посылает xkb, как теперь модно говорить, лесом и использует для переключения на русский свою комбинацию клавиш? >> Так что мой выбор - ru-keys.el ;) (типа mule-light) Serge> я что-то все равно не въехал в него полностью - что он-то делает? ;) позволяет вводить русские буквы в немульном емаксе, переключаясь xkb-шной комбинацией клавиш. -- Regards, Alex_ http://arabella.unis-ru.com/~alex_/

2 participants
1 comments

Re: dired + russian 24 years

Alexey Mahotkin

>>>>> "SO" == Serge Olkhowik <serge(a)atlantis.com.ua> writes: [ че-то мои письма напрямую до тебя не доходят. Какая-то падла по пути говорит, что relaying denied. Это так задумано или нужно сказать, какая именно, чтобы ее замочили? ] >> У меня вообще не включено никакого input method -- оно само (в >> src/event-Xt.c) понимает, что Cyrillic_XXX нужно маппить во внутреннее >> представление кириллических символов. SO> кто "оно"? ;) пока юзаю xkb-хак. "Оно" -- это XEmacs. Какой именно хак? Mule должна без всяких хаков сама назначать все Cyrillic_XXX на self-insert-command. Xkb или Xmodmap используется -- без разницы, главное, чтобы на нажатие русских букв выдавались нужные keysyms (то бишь, Cyrillic_XXXX, а не всякие adiaeresis). SO> кстати, xemacs21-supportel есть (исходники) а вот mulesupportel - не SO> эээ. а где же исходники??? ;) http://www.debian.org/Bugs/ или как-то так. SO> так что не в этом дело. надо разбираться непосредственно со вводом >> У меня Cyrillic_es runs `self-insert-command' SO> это где прописано? Я ж говорю -- в src/event-Xt.c, в maybe_define_x_key_as_self_inserting_character() ;) SO> патчик я тогда положил (нашел исходники, пропатчил без проблем, SO> перекомпилировал SO> /usr/lib/xemacs-21.4.1/lisp/mule/cyrillic.el... Wrote SO> /usr/lib/xemacs-21.4.1/lisp/mule/cyrillic.elc Done SO> (set-charset-ccl-program 'cyrillic-iso8859-5 'ccl-encode-koi8-r-font) SO> (set-charset-ccl-program 'ascii 'ccl-encode-koi8-r-font) SO> хе, получаю облом SO> (error "Invalid ccl-program" ccl-encode-koi8-r-font) Если сработает то же самое, но с 'ccl-encode-koi8-font, значит, криво приложил патчик ;) Если не сработает -- будем смотреть дальше. SO> пытаюсь разобраться - никак не могу понять, как выцепить SO> интерактивно, какая ccl-encode прописана на cyrillic-iso8859-5? (get-charset-property 'cyrillic-iso8859-5 'ccl-program) Наведи курсор после закрывающей скобки и нажми C-x C-e :) SO> далее, вопрос по фонтам - я поставил etl фонты, а как их прописать? См. в info xemacs: "Faces", "X Resources"). >> А как рисует? Как оно отображает слово "привет"? Если как "ъЮьруБ", то >> это нужно правильно выставить set-charset-ccl-program. SO> не, акценты всякия.. Значит, шрифт не тот подхватывает. Скажи C-x C-e после (face-font-name 'default) C-u C-x C-e вставляет в буфер результат вычисления s-expression :) --alexm

3 participants
2 comments

dired + russian 24 years

Alex Ott

Hello В xemacs 20.x & 21.1.x dired понимал русские даты используя переменную dired-re-month-and-time при переходе на xemacs 21.4.x это перестало работать. Никто не сталкивался с этим? и как решалось? -- With best wishes, Alex Ott ------------------------------- FTF, TPU, Russia, mailto: ott(a)phtd.tpu.edu.ru, http://www.phtd.tpu.edu.ru/~ott/ ICQ #22005116

4 participants
3 comments

Типа оффтопик 24 years

Vitaly Lugovsky

Сограждане! А кто тут настолько крут, что завел русский под aspell, и прикрутил это дело к XEmacs? А то я, по ходу, торможу - не хочет aspell (0.32.5) кушать словарик, коий я взял из дистрибутива ASP-Linux.

2 participants
1 comments

Re: dired + russian 24 years

Alexey Mahotkin

>>>>> "ANS" == Alexandre N Safiullin <alex_(a)unis-ru.com> writes: [ Отцы! Сначала касательно оффтопиков! ] VL> Subject: Типа оффтопик ANS> Sorry for offtopic, [ Отцы! Какие же это оффтопики? Вы не стесняйтесь ;) ] ANS> but I also use xemacs 21.4.x now, and have ANS> troubles with russian input. Old hack with xkb См. архивы списка рассылки буквально за последнюю неделю. Все эти вопросы там уже обсуждены :) F.A.Q. будет обязательно. Так жить нельзя :) --alexm

2 participants
1 comments

Re: Re[2]: FAQ 24 years

Alexey Mahotkin

>>>>> "OP" == Oleg Polianski <Oleg.Polianski(a)clear.co.nz> writes: >> Кстати, xkb здесь не при чем ;) В раскладке Xmodmap можно указывать >> прямо >> >> keysym i = i I Cyrillic_sha Cyrillic_SHA OP> А оно точно везде работает? Я имею ввиду, оно, часом, в системную OP> локаль полезть не захочет (вопрос актуален только для XFree86 >= OP> 4.0.2)? Оно работает в тех иксах, что в Redhat 7.0 (ну, на david ;) Большие парни уверяют меня, что MB> keysymdef.h has been around for eons. I.e. before X11R6. Зачем бы ему могла понадобиться локаль? --alexm

1 participants
0 comments

Re: Re[2]: FAQ 24 years

Oleg Polyanski

Alexey Mahotkin <alexm(a)jet.msk.su> writes: > WH> настраивать не надо совсем, а вот non-мульный надо. У меня > WH> сделано через навешивание лямбд с (insert)'ами на > WH> Cyrillic_что-то. Если кому-то нужен кусок конфига, могу > WH> прислать. Ясно, что такая методика работает при руссификации > WH> X-ов с помощью xkb, с xmodmap и так все должно работать. > > Кстати, xkb здесь не при чем ;) В раскладке Xmodmap можно указывать > прямо > > keysym i = i I Cyrillic_sha Cyrillic_SHA > > (это мой текущий ~/.Xmodmap). > > Я тоже раньше думал, что xkb is relevant here. А оно точно везде работает? Я имею ввиду, оно, часом, в системную локаль полезть не захочет (вопрос актуален только для XFree86 >= 4.0.2)? -- -- Oleg Polianski <Oleg.Polianski(a)clear.co.nz>

1 participants
0 comments

Re: Dictionary 24 years

Alexey Shishkin

>>>>> Vladimir Bormotov writes: AWN> Вариант, когда Mail-Followup-To отсутствует -- это хороший вопрос... Vladimir> вариант, когда Followup дает Vladimir> To: автор Vladimir> Cc: список рассылки Vladimir> xemacs/gnus ;) Vladimir> как его правильно научить для некоторых "групп" при followup делать ответ Vladimir> только в список? Прописать в параметрах группы ( `G p' на группе ) примерно так: ( ;; адрес для follow-up and reply (to-address . "Russian XEmacs Users <xemacs-users-ru(a)xemacs.org>") ;; адрес для posting (to-list . "Russian XEmacs Users <xemacs-users-ru(a)xemacs.org>") ;; Hе вестись на Reply-To: (broken-reply-to . t) ;; адрес для unsubscribe :-) (admin-address . "xemacs-users-ru-request(a)xemacs.org") ;; вот так, а не total-expire (auto-expire . t)) Hе забыть вписать в .gnus.el: (setq gnus-add-to-list t ;; при постинге ( `a' ) вставлять To: для ;; данной группы gnus-suppress-duplicates t) ;; Читать мессагу только один раз. ;; Есть нюансы. Hо с одинаковыми ;; Message-ID работает. А еще вот так вырубается скоринг для всех емыльных групп (если неохота каждой параметры вписывать): $ cat ~/News/nnml:all.SCORE ((adapt ignore) (local (gnus-use-scoring nil)) (exclude-files "all.SCORE")) вместо `nnml' - твой любимый backend. -- Alexey Disclaimer: Any errors in spelling, tact, or fact are transmission errors.

1 participants
0 comments

2025

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

2002

2001

XEmacs-Users-ru June 2001