diff --git a/.github/workflows/ci.yml b/.github/workflows/ci.yml index 2e4c7a1..66354b4 100644 --- a/.github/workflows/ci.yml +++ b/.github/workflows/ci.yml @@ -14,7 +14,7 @@ jobs: - uses: purescript-contrib/setup-purescript@main with: - purescript: "0.14.0-rc3" + purescript: "0.14.0-rc5" - uses: actions/setup-node@v1 with: diff --git a/src/Node/ReadLine.js b/src/Node/ReadLine.js index e83dd67..1cf1d5b 100644 --- a/src/Node/ReadLine.js +++ b/src/Node/ReadLine.js @@ -45,11 +45,9 @@ exports.question = function (text) { }; exports.setPrompt = function (prompt) { - return function (length) { - return function (readline) { - return function () { - readline.setPrompt(prompt, length); - }; + return function (readline) { + return function () { + readline.setPrompt(prompt); }; }; }; diff --git a/src/Node/ReadLine.purs b/src/Node/ReadLine.purs index aa36bfc..ecedb55 100644 --- a/src/Node/ReadLine.purs +++ b/src/Node/ReadLine.purs @@ -98,7 +98,6 @@ foreign import question -- | Set the prompt. foreign import setPrompt :: String - -> Int -> Interface -> Effect Unit diff --git a/test/Main.purs b/test/Main.purs index f72d1cc..3661c83 100644 --- a/test/Main.purs +++ b/test/Main.purs @@ -10,7 +10,7 @@ import Node.ReadLine (prompt, close, setLineHandler, setPrompt, noCompletion, c main :: Effect Unit main = do interface <- createConsoleInterface noCompletion - setPrompt "> " 2 interface + setPrompt "> " interface prompt interface setLineHandler interface $ \s -> if s == "quit"