Spell checking in Windows OS

[Gavin-Holt]

Hi,

This is a simple function to send the current file name to Hunspell.exe which includes a TUI for spell-checking.

I have copied a Windows port of Hunspell into a folder, hence the full paths in my script. As you can see, I am using en_GB for UK English spelling.

function spellCheckdlg(Current)    
    local filetype = Current.Buf:FileType()
    if not filetype then
        -- Need a file on disc to spell check
        -- Insist upon a filetype!
        return
    else
        -- Save the file so the disc image is current
        Current.Buf:Save()
    end
    
    if filetype=="html" then
        local SpellCommand = [[O:\MyProfile\editor\hunspell\hunspell.exe -H -d O:\MyProfile\editor\hunspell\en_GB -p O:\MyProfile\editor\hunspell\USER_DICT.dic ]]
        shell.RunInteractiveShell(SpellCommand..Current.Buf.AbsPath, true, false)
    else
        local SpellCommand = [[O:\MyProfile\editor\hunspell\hunspell.exe -d O:\MyProfile\editor\hunspell\en_GB -p O:\MyProfile\editor\hunspell\USER_DICT.dic ]]
        shell.RunInteractiveShell(SpellCommand..Current.Buf.AbsPath, true, false)
    end
end

After e(X)iting Hunspell.exe micro will prompt to reload the altered file, with all your corrections :)

Enjoy.

Kind Regards Gavin Holt