fix autoinstall of zsh completer

This commit is contained in:
Keagan McClelland
2022-05-27 16:18:53 -06:00
parent a1ca3a5eaf
commit 6367da9c3b

View File

@@ -31,6 +31,7 @@ import Data.ByteArray.Encoding ( Base(..)
) )
import qualified Data.ByteString.Char8 as B8 import qualified Data.ByteString.Char8 as B8
import qualified Data.ByteString.Lazy as LB import qualified Data.ByteString.Lazy as LB
import Data.Conduit.Process ( readProcess )
import Data.Default import Data.Default
import Data.Functor.Contravariant ( contramap ) import Data.Functor.Contravariant ( contramap )
import Data.HashMap.Internal.Strict ( HashMap import Data.HashMap.Internal.Strict ( HashMap
@@ -344,10 +345,11 @@ init sh = do
appendFile bashrc "source <(embassy-publish --bash-completion-script `which embassy-publish`)\n" appendFile bashrc "source <(embassy-publish --bash-completion-script `which embassy-publish`)\n"
Fish -> do Fish -> do
let fishrc = home </> ".config" </> "fish" </> "config.fish" let fishrc = home </> ".config" </> "fish" </> "config.fish"
appendFile fishrc "source <(embassy-publish --fish-compltion-script `which embassy-publish`)\n" appendFile fishrc "source <(embassy-publish --fish-completion-script `which embassy-publish`)\n"
Zsh -> do Zsh -> do
let zshrc = home </> ".zshrc" let zshcompleter = "/usr/local/share/zsh/site-functions/_embassy-publish"
appendFile zshrc "source <(embassy-publish --zsh-completion-script `which embassy-publish`)\n" res <- readProcess "embassy-publish" ["--zsh-completion-script", "`which embassy-publish`"] ""
writeFile zshcompleter (toS res)