Mercurial > vim
view runtime/spell/fixdup.vim @ 17298:3d90ae62deca v8.1.1648
patch 8.1.1648: MS-Windows: build error with normal feaures
commit https://github.com/vim/vim/commit/3f3e954d9676e374f222a18786c78e50af5041cb
Author: Bram Moolenaar <Bram@vim.org>
Date: Sun Jul 7 20:30:48 2019 +0200
patch 8.1.1648: MS-Windows: build error with normal feaures
Problem: MS-Windows: build error with normal feaures.
Solution: Adjust #ifdef for find_word_under_cursor().
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Sun, 07 Jul 2019 20:45:04 +0200 |
parents | 7cfe57329284 |
children |
line wrap: on
line source
" Vim script to fix duplicate words in a .dic file vim: set ft=vim: " " Usage: Edit the .dic file and source this script. let deleted = 0 " Start below the word count. let lnum = 2 while lnum <= line('$') let word = getline(lnum) if word !~ '/' if search('^' . word . '/', 'w') != 0 let deleted += 1 exe lnum . "d" continue " don't increment lnum, it's already at the next word endif endif if lnum%1000 == 0 echon "\r Processing line ".lnum. printf(" [ %02d%%]", lnum*100/line('$')) endif let lnum += 1 endwhile if deleted == 0 echomsg "No duplicate words found" elseif deleted == 1 echomsg "Deleted 1 duplicate word" else echomsg printf("Deleted %d duplicate words", deleted) endif