I hereby claim:
- I am osener on github.
- I am osener (https://keybase.io/osener) on keybase.
- I have a public key ASB8JfwlBJ5CV1QALgFPJfobj1UxIOmE4_ZZmEb7lxIGyAo
To claim this, I am signing this object:
| [ | |
| { | |
| "bindings": { | |
| "ctrl-g": "menu::Cancel", | |
| "ctrl-x o": "workspace::ActivateNextPane", | |
| "ctrl-tab": "pane::ActivateNextItem", | |
| "ctrl-shift-tab": "pane::ActivatePrevItem" | |
| } | |
| }, | |
| { |
| (library | |
| (name dune_reason_bisect) | |
| (inline_tests) | |
| (preprocess (pps ppx_expect bisect_ppx))) |
| { | |
| "name": "repromise_bundle_size_test", | |
| "version": "0.1.0", | |
| "sources": { | |
| "dir" : ".", | |
| }, | |
| "package-specs": { | |
| "module": "es6-global", | |
| "in-source": true | |
| }, |
| module Encode = struct | |
| include Json.Encode | |
| type 'a t = 'a -> Js.Json.t | |
| type field = string * Js.Json.t | |
| let unit () = null | |
| let make f = f |
I hereby claim:
To claim this, I am signing this object:
| {-# LANGUAGE FlexibleContexts #-} | |
| {-# LANGUAGE GADTs #-} | |
| {-# LANGUAGE TemplateHaskell #-} | |
| module Widgets.Setting where | |
| import Control.Applicative | |
| import Control.Monad | |
| import Control.Monad.IO.Class | |
| import Data.Default |
| module API where | |
| import Haste.App | |
| -- | Data type to hold all our API calls | |
| data API = | |
| API {setTitle :: Remote (String -> Server ())} |
| {-# LANGUAGE OverloadedStrings #-} | |
| import Control.Monad.IO.Class (liftIO) | |
| import Graphics.UI.Thrust | |
| import Graphics.UI.Thrust.SimpleMenu | |
| import qualified Graphics.UI.Thrust.Window as W | |
| setup :: Window -> UI () | |
| setup w = | |
| do W.create |
| ➤ pwd | |
| /Users/ozan/vcs/nixpkgs | |
| ➤ git config --get remote.origin.url | |
| https://github.com/joelteon/nixpkgs | |
| ➤ echo $NIX_PATH | |
| nixpkgs=/Users/ozan/vcs/nixpkgs | |
| ➤ nix-env -i gnutar |
| {-# LANGUAGE OverloadedStrings #-} | |
| module Downloader where | |
| import Control.Monad.IO.Class (liftIO) | |
| import Control.Monad.Trans.Resource | |
| import qualified Data.ByteString as BS | |
| import qualified Data.ByteString.Char8 as C8 | |
| import Data.Conduit | |
| import qualified Data.Conduit.Binary as CB |