Use 'code' as query param

Author: pete-murphy

README.md

@@ -28,10 +28,10 @@ Most of these features can be controlled not only from the toolbar, but also usi
     - Example: `gist=37c3c97f47a43f20c548`
     - Notes: the file should be named `Main.purs` with the module name `Main`.
 
-- **Load From URL**: Load compressed PureScript code using the `purs` parameter
+- **Load From URL**: Load compressed PureScript code using the `code` parameter
     - Managed by Try PureScript and updated on editor state change to create shareable URLs
-    - Format: `purs=<compressed string>`
-    - Example: `purs=LYewJgrgNgpgBAWQIYEsB2cDuALGAnGIA` will set the editor state to the single line `module Main where`
+    - Format: `code=<compressed string>`
+    - Example: `code=LYewJgrgNgpgBAWQIYEsB2cDuALGAnGIA` will set the editor state to the single line `module Main where`
 
 - **View Mode**: Control the view mode using the `view` parameter
     - Options are: `code`, `output`, `both` (default)

client/src/Try/Container.purs

@@ -141,7 +141,7 @@ component = H.mkComponent
           handleAction $ Compile Nothing
 
     EncodeInURL text -> H.liftEffect do
-      setQueryString "purs" $ compressToEncodedURIComponent text
+      setQueryString "code" $ compressToEncodedURIComponent text
 
     Compile mbCode -> do
       H.modify_ _ { compiled = Nothing }
@@ -545,7 +545,7 @@ toAnnotation markerType { position, message } =
 
 withSession :: Aff { sourceFile :: Maybe SourceFile, code :: String }
 withSession = do
-  state <- H.liftEffect $ getQueryStringMaybe "purs" 
+  state <- H.liftEffect $ getQueryStringMaybe "code" 
   githubId <- H.liftEffect $ getQueryStringMaybe "github" 
   gistId <- H.liftEffect $ getQueryStringMaybe "gist"
   code <- case state >>= decompressFromEncodedURIComponent of