diff options
| author | Daniel Baumann <daniel.baumann@progress-linux.org> | 2024-04-07 08:50:31 +0000 |
|---|---|---|
| committer | Daniel Baumann <daniel.baumann@progress-linux.org> | 2024-04-07 08:50:31 +0000 |
| commit | aed8ce9da277f5ecffe968b324f242c41c3b752a (patch) | |
| tree | d2e538394cb7a8a7c42a4aac6ccf1a8e3256999b /runtime/spell/fixdup.vim | |
| parent | Initial commit. (diff) | |
| download | vim-upstream.tar.xz vim-upstream.zip | |
Adding upstream version 2:9.0.1378.upstream/2%9.0.1378upstream
Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>
Diffstat (limited to 'runtime/spell/fixdup.vim')
| -rw-r--r-- | runtime/spell/fixdup.vim | 30 |
1 files changed, 30 insertions, 0 deletions
diff --git a/runtime/spell/fixdup.vim b/runtime/spell/fixdup.vim new file mode 100644 index 0000000..3f28fb5 --- /dev/null +++ b/runtime/spell/fixdup.vim @@ -0,0 +1,30 @@ +" 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 |