|
ru.linux
- RU.LINUX ---------------------------------------------------------------------
From : Roman Lagunov 2:450/42.101 28 Dec 2002 01:54:47
To : Evgenij M. Baldin
Subject : Вопрос про рус<->лат в emacs, но не про переключалку :)
--------------------------------------------------------------------------------
27 Dec 02 08:58, Evgenij M. Baldin wrote to All:
EB> Довольно часто что-нибудь пишешь и обнаруживаешь, что забыл
EB> переключить регистр, приходится перебивать заново.
EB> Лениво разбираться, потому обращаюсь ко всезнающему сообществу:
EB> поделиться примером для .emacs, где есть функция, которая производит
EB> преобразование выделенного фрагмента.
EB> Hапример я написал следующее:
EB> Yfghbvth z yfgbcfk cktle.ott:
EB> Две вышеупомянутые фразы одно и то же, но во втором случае я не сменил
EB> регистр.
(defun my-latcyr-recode ()
"Преобразование ASDF-ФЫВА в выделенном тексте, или в слове под курсором"
(interactive)
(let (text
(bounds (if (region-exists-p)
(cons (region-beginning)(region-end))
(bounds-of-thing-at-point 'word))))
(when bounds
(setq text (buffer-string (car bounds)(cdr bounds)))
(delete-region (car bounds)(cdr bounds))
(insert-string (concat (mapcar (lambda (char)
(or (car (quail-lookup-key
(string char))) char))
text))))))
Правда, это для XEmacs.
Roman
... Широко известный в узких кругах.
--- GoldED+/LNX 1.1.5
* Origin: Powered by Debian GNU/Linux 3.0 aka Woody (2:450/42.101)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
