ru.linux

 
 - RU.LINUX ---------------------------------------------------------------------
 From : Roman Belenov                        2:5020/400     26 Dec 2002  12:21:00
 To : John Lepikhin
 Subject : Re: вопрос по eLisp
 -------------------------------------------------------------------------------- 
 

 John Lepikhin <John.Lepikhin@f156.n5070.z2.fidonet.org> writes:
 
 >         Встала задача удалить находящееся на указателе слово. Причем,
 > "слово" может содержать любые не-пробелы. Тупым циклом (while не-пробел
 > delete-char) делать не хочется. Что посоветуете?
 
 (defun kill-current-word ()
   "Kill word at point"
   (interactive)
   (search-backward-regexp "\\s ")
   (forward-char)
   (let ((point (point)))
     (search-forward-regexp "\\s ")
     (backward-char)
     (kill-region point (point))))
     
 -- 
                With regards, Roman.
 
 Standard disclaimer: I work for them, but I don't speak for them.
 
 --- ifmail v.2.15dev5
  * Origin: Demos online service (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор