Handle Clipboard being undefined in insecure contexts

[ysangkok]

Fixes #14.

[ysangkok]

I tested this with the following program:

module Test.Main where

import Prelude
import Effect (Effect)
import Effect.Console (log)
import Web.Clipboard (clipboard)
import Data.Maybe (isJust)
import Web.HTML (window)
import Web.HTML.Window (navigator)

main :: Effect Unit
main = do
  clp <- window >>= navigator >>= clipboard
  log $ show $ isJust $ clp

Which I bundled using

spago bundle --platform browser --bundle-type app --module Test.Main --outfile index.js

[garyb]

Would you mind making one further change? Add an explicit export list that exports everything aside from the clipboardWrapper. Thanks!

[ysangkok]

@garyb Done

[garyb]

Sorry, one last minor thing, eslint is complaining because of single rather than double quotes ('undefined') in the JS.

[ysangkok]

@garyb Added a commit to switch quote style, tested with following eslint.config.mjs configuration:

import globals from "globals";
import pluginJs from "@eslint/js";
import stylisticJs from "@stylistic/eslint-plugin-js"

export default [
  {
    languageOptions: { globals: globals.browser }
    , plugins: {"@stylistic/js": stylisticJs}
    , rules:
        {
          "@stylistic/js/indent": ["warn", 2]
          , "@stylistic/js/quotes": ["warn", "double"]
        }
  },
  pluginJs.configs.recommended,
];

[garyb]

Thanks!