view runtime/spell/fixdup.vim @ 32250:b1ea62e14b3c v9.0.1456

patch 9.0.1456: shortmess test depends on order of test execution Commit: https://github.com/vim/vim/commit/657b31fa3bda2089fef18c30fc706abe5d57e865 Author: zeertzjq <zeertzjq@outlook.com> Date: Sat Apr 15 21:28:02 2023 +0100 patch 9.0.1456: shortmess test depends on order of test execution Problem: Shortmess test depends on order of test execution. Solution: Clear messages. (closes https://github.com/vim/vim/issues/12264)
author Bram Moolenaar <Bram@vim.org>
date Sat, 15 Apr 2023 22:30:03 +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