ru.unix

 
 - RU.UNIX ----------------------------------------------------------------------
 From : Oleg Sukhanov                        2:5042/12.1    12 Jun 2003  13:35:36
 To : All
 Subject : wim script
 -------------------------------------------------------------------------------- 
 

 
 set titlestring=Vim:\ Article\ edit
 setlocal textwidth=72 formatoptions=tcrq1 expandtab nomodeline
 
 1;/^$/,/^-- $/call SetQuoteComments()
 "1;/^$/,$call SetQuoteComments()
 
 " Hайти все последовательности цитирования в письме и составить из них опцию
 " comments для удобства форматирования
 " (c) Artem Chuprina <2:5020/371.32@fidonet>
 function! SetQuoteComments () range abort
     let quote_re = '[A-Za-zёЁю-Ъ]\{1,6}>' " Sorry, for koi8-r
     let &comments = "n:>"
     let end_line = a:lastline
     let current_line = a:firstline
     while current_line <= end_line
         let test_string = getline(current_line)
         let maxlen = strlen(test_string)
         let match_end_pos = matchend(test_string, '^[ \t>]*'.quote_re)
         while match_end_pos > 0
             let prefix = matchstr(test_string, quote_re)
             let test_string = strpart(test_string, match_end_pos, maxlen)
             let match_end_pos = matchend(test_string,'^[\s>]*'.quote_re)
             if &comments !~ ':'.prefix.'\($\|,\)'
                 let &comments = &comments.',n:'.prefix
             endif
         endwhile
         let current_line = current_line + 1
     endwhile
 endfunction
 
 Если применять как есть, то ругается, что не найден паттерн ^-- $, хотя
 tin честно вставляет сигнатуру.
 Если закомментировать строку с --, и раскомментировать нижнюю, то
 ругается на неизвестную финкцию SetQuoteComments.
 Хотелось бы научить искать сигнатуру.
 
 [black@localhost kernel]$ rpm -qa |grep vim
 vim-common-6.2.014-alt1
 vim-X11-6.2.014-alt1
 vim-minimal-6.2.014-alt1
 vim-X11-athena-6.2.014-alt1
 
 -- 
 Best regards, Oleg   mailto:black_nospam_@kaznaufk.amur.ru
 Благовещенск-на-Амуре              AKA 2:5042/12
 
 ... Программу циклом не испортишь
 --- tin/1.5.10-20011117/Darkcell, Linux/2.4.20-alt7-up/i686, 0 days, 17:35:44
  * Origin: FIDOGATE (2:5042/12.1)
 
 

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