|
@ -6,7 +6,7 @@ import System.Console.Readline |
|
|
import Control.Monad |
|
|
import Control.Monad |
|
|
import Text.Printf |
|
|
import Text.Printf |
|
|
|
|
|
|
|
|
questionPath = "/home/wes/haskell/Questioner/questions.json" |
|
|
questionPath = "./questions.json" |
|
|
getQuestionFile = So.readFile questionPath |
|
|
getQuestionFile = So.readFile questionPath |
|
|
|
|
|
|
|
|
getjust (Just a) = a |
|
|
getjust (Just a) = a |
|
|