Mercurial > vim
view runtime/ftplugin/modula2.vim @ 29457:53d8ef8442d8 v9.0.0070
patch 9.0.0070: using utfc_ptr2char_len() when length is negative
Commit: https://github.com/vim/vim/commit/4dc513a22c017b3061287deac74fa55f70a3214c
Author: zeertzjq <zeertzjq@outlook.com>
Date: Mon Jul 25 19:42:02 2022 +0100
patch 9.0.0070: using utfc_ptr2char_len() when length is negative
Problem: Using utfc_ptr2char_len() when length is negative.
Solution: Check value of length. (closes https://github.com/vim/vim/issues/10760)
| author | Bram Moolenaar <Bram@vim.org> |
|---|---|
| date | Mon, 25 Jul 2022 20:45:02 +0200 |
| parents | 9f41bfdbc6fc |
| children | ff27442e7851 |
line wrap: on
line source
" Vim filetype plugin file " Language: Modula-2 " Maintainer: Doug Kearns <dougkearns@gmail.com> " Last Change: 2021 Apr 08 if exists("b:did_ftplugin") finish endif let b:did_ftplugin = 1 let s:cpo_save = &cpo set cpo&vim setlocal comments=s0:(*,mb:\ ,ex:*) setlocal commentstring=(*%s*) setlocal formatoptions-=t formatoptions+=croql if exists("loaded_matchit") && !exists("b:match_words") " The second branch of the middle pattern is intended to match CASE labels let b:match_words = '\<REPEAT\>:\<UNTIL\>,' .. \ '\<\%(BEGIN\|CASE\|FOR\|IF\|LOOP\|WHILE\|WITH\)\>' .. \ ':' .. \ '\<\%(ELSIF\|ELSE\)\>\|\%(^\s*\)\@<=\w\+\%(\s*\,\s*\w\+\)\=\s*\:=\@!' .. \ ':' .. \ '\<END\>' endif if (has("gui_win32") || has("gui_gtk")) && !exists("b:browsefilter") let b:browsefilter = "Modula-2 Source Files (*.def *.mod)\t*.def;*.mod\n" .. \ "All Files (*.*)\t*.*\n" endif let b:undo_ftplugin = "setl com< cms< fo< " .. \ "| unlet! b:browsefilter b:match_words" let &cpo = s:cpo_save unlet s:cpo_save " vim: nowrap sw=2 sts=2 ts=8 noet: