|
2 | 2 | " Description: Perform Ada specific completion & tagging. |
3 | 3 | " Language: Ada (2005) |
4 | 4 | " $Id: ada.vim 887 2008-07-08 14:29:01Z krischik $ |
5 | | -" Maintainer: Martin Krischik <krischik@users.sourceforge.net> |
| 5 | +" Maintainer: This runtime file is looking for a new maintainer. |
| 6 | +" Previous Maintainer: Martin Krischik <krischik@users.sourceforge.net> |
6 | 7 | " Taylor Venable <taylor@metasyntax.net> |
7 | 8 | " Neil Bird <neil@fnxweb.com> |
8 | 9 | " $Author: krischik $ |
|
19 | 20 | " autoload |
20 | 21 | " 05.11.2006 MK Bram suggested to save on spaces |
21 | 22 | " 08.07.2007 TV fix default compiler problems. |
| 23 | +" 05.09.2025 do not globally set 'ignorecase'/'smartcase' option |
| 24 | +" set undo_ftplugin |
| 25 | +" mark as unmaintained |
| 26 | +" use buffer-local abbreviation |
22 | 27 | " Help Page: ft-ada-plugin |
23 | 28 | "------------------------------------------------------------------------------ |
24 | 29 | " Provides mapping overrides for tag jumping that figure out the current |
@@ -48,8 +53,8 @@ setlocal complete=.,w,b,u,t,i |
48 | 53 |
|
49 | 54 | " Section: case {{{1 |
50 | 55 | " |
51 | | -setlocal nosmartcase |
52 | | -setlocal ignorecase |
| 56 | +" setlocal nosmartcase |
| 57 | +" setlocal ignorecase |
53 | 58 |
|
54 | 59 | " Section: formatoptions {{{1 |
55 | 60 | " |
@@ -115,7 +120,6 @@ if !exists ("b:match_words") && |
115 | 120 | \ s:notend . '\<record\>:\<end\>\s\+\<record\>' |
116 | 121 | endif |
117 | 122 |
|
118 | | - |
119 | 123 | " Section: Compiler {{{1 |
120 | 124 | " |
121 | 125 | if ! exists("g:ada_default_compiler") |
@@ -152,10 +156,10 @@ endif |
152 | 156 | " Section: Abbrev {{{1 |
153 | 157 | " |
154 | 158 | if exists("g:ada_abbrev") |
155 | | - iabbrev ret return |
156 | | - iabbrev proc procedure |
157 | | - iabbrev pack package |
158 | | - iabbrev func function |
| 159 | + iabbrev <buffer> ret return |
| 160 | + iabbrev <buffer> proc procedure |
| 161 | + iabbrev <buffer> pack package |
| 162 | + iabbrev <buffer> func function |
159 | 163 | endif |
160 | 164 |
|
161 | 165 | " Section: Commands, Mapping, Menus {{{1 |
@@ -194,6 +198,12 @@ if !exists(':AdaTagFile') |
194 | 198 | \ ':AdaTypes', |
195 | 199 | \'call ada#Switch_Syntax_Option (''standard_types'')') |
196 | 200 | endif |
| 201 | +" |
| 202 | +" Section: b:undo_ftplugin {{{1 |
| 203 | +let b:undo_ftplugin = "setl fo< comments< tw< commentstring< complete< " |
| 204 | + \ . "| setl completefunc< omnifunc< ts< sts< sw< fdm< fde< fdi< " |
| 205 | + \ . "| setl fdm< fde< fdi< fdn< " |
| 206 | + \ . "| unlet! b:match_words " |
197 | 207 |
|
198 | 208 | " 1}}} |
199 | 209 | " Reset cpoptions |
|
0 commit comments