blob: db0236b4a22c12e466d9f491279695e2aed8ba26 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
|
"------------------------[ Magic Picard's vimrc ]--------------
"syntax clear
syntax on
"Allow special Vim improvements like multiple-undo
set nocompatible
set bkc=no
"Set improve Backspace
set bs=2
"Show the current edition mode on last line, number of column and line
set showmode
set ruler
set nu
set ls=2
" Set Auto-indentation
set ai
set cin
" Make command line X lines high
set ch=1
" Highlight search strings
set hlsearch
" Incremental search
set incsearch
" Hide mouse when typing
set mousehide
" highlighting strings inside C comments
let c_comment_strings=1
" Backup dir
set aw
" compilation macros
map <C-K> :Domake<CR>
map \ :cl<CR>
imap <F9> <Esc>:cN<CR>i
imap <F10> <Esc>:cn<CR>i
" set default error format
"set efm=\"%f\"\\,\ line\ %l:\ error\ %m,\"%f\"\\,\ line\ %l:\ warning\ %m
" remaps C-j & C-k to C-y and C-e
noremap <C-j> <C-y>
noremap <C-k> <C-e>
"Macros
map <F2> :source ~/.vim/bépo
"map <F2> :Printcheader
"map <F3> :Printfheader
"map <F4> :Printhheader
map <F5> ^i/* <C-[>$a */<C-[>
map <F6> ^./\/\* <C-[>3x^./ \*\/<C-[>3x
" folding
map <F8> :SwitchFoldState<CR>
map <F9> zA
"buffer moving
map <C-B> :bN<CR>
" Load local cscope db if exists
if filereadable( expand("$PWD/tags") )
set tags=tags
elseif filereadable( expand("$ROOT/ctags.out") )
set tags=$ROOT/ctags.out
elseif has("cscope")
if filereadable( expand("$ROOT/cscope.out") )
set cst
" cscope macros
map <C-]> :cs find g <C-R>=expand("<cword>")<CR><CR> " find global definition
map <C-[> :cs find c <C-R>=expand("<cword>")<CR><CR> " find callers of function under cursor
map <C-\> :cs find t <C-R>=expand("<cword>")<CR><CR> " find assignments to variable under cursor
map <C-s> :cs find s <C-R>=expand("<cword>")<CR><CR> " find string under cursor
map <C-f> :cs find f <C-R>=expand("<cword>")<CR><CR> " find file under cursor
map <C-i> :cs find i <C-R>=expand("<cword>")<CR><CR> " find files including file under cursor
map <C-i> :cs find I %<CR> " find files including current file
cs add $ROOT/cscope.out $ROOT
endif
endif
autocmd BufRead * color pobla
"autocmd BufRead *.[ch] color pobla
"autocmd BufRead *.php color pablo
autocmd BufRead /tmp/mutt-*[0-9] color elflord
set title
set autoindent
set diffopt=iwhite,filler
set guifont=LucidaTypewriter\ 8
" mouse
" v -> enabled in visual mode
" i -> enabled in insert mode
" c -> enabled in command mode
set mouse=a
set mousem=extend
set tabstop=4
set shiftwidth=4
set noexpandtab
map U yyp:s/[^ ]/-/g<CR>:noh<CR>
map <ESC>Q v/$\n\n<CR>J:.!fmt -tcw78<CR>:noh<CR>
" Function
" Erase_Sig_but_Your()
"
" Author
" Yann Kerhervé <yk@cyberion.net>
" Based on Luc Hermitte <hermitte@free.fr> work
"
" Purpose
" Deletes signatures at the end of e-mail replies. But keep
" your sig intact (mutt-added).
" Also deletes the empty lines (even those beginning by '>')
" preceding the signature.
"
function! Erase_Sig_but_Your()
" Search for the signature pattern : "^> -- $"
let lastline = line ('$')
let i = lastline
" (1)
while i >= 1
if getline(i) =~ '^> *-- $'
break
endif
let i = i - 1
endwhile
" let find the beginning of our sig
let j = i
while j < lastline
let j = j + 1
if getline(j) =~ '^-- $'
let j = j - 1
break
endif
endwhile
" If (1) found, then
if i != 0
" First, search for the last non empty (non sig) line
while i >= 1
let i = i - 1
" rem : i can't value 1
if getline(i) !~ '^(>s*)*$'
break
endif
endwhile
" Second, delete these lines plus the signature
let i = i + 1
exe 'normal '.i.'Gd'.j.'G'
endif
endfunction
" <ESC>n goto next empty reply-to paragraph
" <ESC>m opens an empty reply-paragraph at this line
" <ESC>d deletes everything until but the signature
" <ESC>D deletes everything until but the next reply-to §
autocmd BufRead /tmp/mutt-*[0-9] map <ESC>n /^> $<CR>
autocmd BufRead /tmp/mutt-*[0-9] map <ESC>m 'ddO<CR><CR><ESC>-I
autocmd BufRead /tmp/mutt-*[0-9] map <ESC>D ^d?^\([^>]\\|$\)?+<CR>O<ESC>
autocmd BufRead /tmp/mutt-*[0-9] map <ESC>d ^d/^-- $<CR>O<ESC>
autocmd BufRead /tmp/mutt-*[0-9] set textwidth=74
autocmd BufRead /tmp/mutt-*[0-9] execute Erase_Sig_but_Your()
autocmd BufRead /tmp/mutt-*[0-9] :normal ,n
|
