diff --git a/src/Main.hs b/src/Main.hs
index f4b98d0..5fa1836 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -46,7 +46,7 @@ exec ProgArgs{..} =
 
 doLocal :: String -> Bool -> IO ()
 doLocal name block = do
-  out <- readProcess "namecoind" ["name_show", name] ""
+  out <- readProcess "namecoin-cli" ["name_show", name] ""
   case decode (pack out) of
     Nothing  -> putStrLn "Error parsing data"
     Just res -> do