mirror of
				https://github.com/vim/vim.git
				synced 2025-11-03 09:44:48 -05:00 
			
		
		
		
	
		
			
				
	
	
		
			28 lines
		
	
	
		
			629 B
		
	
	
	
		
			VimL
		
	
	
	
	
	
			
		
		
	
	
			28 lines
		
	
	
		
			629 B
		
	
	
	
		
			VimL
		
	
	
	
	
	
" 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
 | 
						|
  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
 |