Mercurial > vim
annotate runtime/spell/fixdup.vim @ 11006:b3601a8eb679 v8.0.0392
patch 8.0.0392: GUI test fails with Athena and Motif
commit https://github.com/vim/vim/commit/e0c31f6a304496b597a51ce98af419ec815bec74
Author: Bram Moolenaar <Bram@vim.org>
Date: Wed Mar 1 15:07:05 2017 +0100
patch 8.0.0392: GUI test fails with Athena and Motif
Problem: GUI test fails with Athena and Motif.
Solution: Add test_ignore_error(). Use it to ignore the "failed to create
input context" error.
| author | Christian Brabandt <cb@256bit.org> |
|---|---|
| date | Wed, 01 Mar 2017 15:15:05 +0100 |
| parents | 7bc41231fbc7 |
| children | 7cfe57329284 |
| rev | line source |
|---|---|
| 2034 | 1 " Vim script to fix duplicate words in a .dic file vim: set ft=vim: |
| 2 " | |
| 3 " Usage: Edit the .dic file and source this script. | |
| 4 | |
| 5 let deleted = 0 | |
| 6 | |
| 7 " Start below the word count. | |
| 8 let lnum = 2 | |
| 9 while lnum <= line('$') | |
| 10 let word = getline(lnum) | |
| 11 if word !~ '/' | |
| 12 if search('^' . word . '/', 'w') != 0 | |
| 13 let deleted += 1 | |
| 14 exe lnum . "d" | |
| 15 continue " don't increment lnum, it's already at the next word | |
| 16 endif | |
| 17 endif | |
| 18 let lnum += 1 | |
| 19 endwhile | |
| 20 | |
| 21 if deleted == 0 | |
| 22 echomsg "No duplicate words found" | |
| 23 elseif deleted == 1 | |
| 24 echomsg "Deleted 1 duplicate word" | |
| 25 else | |
| 26 echomsg printf("Deleted %d duplicate words", deleted) | |
| 27 endif |