codedmart

set nocompatible
filetype off

set rtp+=~/.vim/bundle/Vundle.vim
call vundle#begin()

Plugin 'gmarik/Vundle.vim'

Plugin 'kien/ctrlp.vim'
Plugin 'Valloric/ListToggle'

codedmart

installing ‘vim_configurable-7.4.516’
these derivations will be built:
  /nix/store/c81bhjpzxa9sngr33w3bis5465id0axz-vim_configurable-7.4.516.drv
building path(s) ‘/nix/store/77gd8kqcpy3w5z4440k1g9xfbmwdf9sf-vim_configurable-7.4.516’
unpacking sources
unpacking source archive /nix/store/llbsiq7kakf07m5rl09p2kvbbm2q0fkj-vim-nox-hg-2082fc3.tar.bz2
source root is nix_repository_manager
patching sources
applying patch /nix/store/6cdi98w5p0nwx5rahal7rqk9qvynqpbf-python_framework.patch
patching file auto/configure

codedmart

{
  packageOverrides = super: let self = super.pkgs; in

  {
    # Rethinkdb 2.0.0
    rethinkDB200 = self.stdenv.lib.overrideDerivation self.rethinkdb (oldAttrs: {
      name = "rethinkdb-2.0.0-1";
      patches = if self.stdenv.isDarwin then [ ./rethinkdb-2.0.0-1/sedDarwin.patch ] else null;
    });

codedmart

let
  pkgs = import <nixpkgs> {};
  stdenv = pkgs.stdenv;
  config = import ~/.nixpkgs/config.nix {};
in rec {
  haskellRethinkDB784 = stdenv.mkDerivation rec {
    name = "haskell-rethinkdb-784";
    buildInputs = [
      config.ghc784
    ];

codedmart

{
  packageOverrides = super:
    let
      self = super.pkgs;
      ghc784Package = self.haskell.packages.ghc784.ghcWithPackages (
        haskellPackages: with haskellPackages; [
          cabal-install
          cabal2nix
        ]
      );

codedmart

let
  pkgs = import <nixpkgs> {};
  stdenv = pkgs.stdenv;

in rec {
  # GHC 7.6.3
  ghc763 = stdenv.mkDerivation rec {
    name = "ghc-763";
    buildInputs = [
      pkgs.haskell.packages.ghc763.ghc

codedmart

{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DeriveDataTypeable #-}

module Lib.Config (
    ApiInfo(..)
    , Config(..)
    , TnConfig(..)
    , TnOptions(..)
    , TnIO

codedmart

data ApiInfo = ApiInfo {
  name :: T.Text,
  version :: T.Text
} deriving (Eq, Generic)

instance FromJSON ApiInfo
instance ToJSON ApiInfo

data Config = Config {
   info :: ApiInfo

codedmart

data ApiInfo = ApiInfo {
  name :: T.Text,
  version :: T.Text
} deriving (Eq, Generic)

instance FromJSON ApiInfo
instance ToJSON ApiInfo

data Config = Config {
   apiInfo :: ApiInfo

codedmart

type IsSecureApi = IsSecure :> Get '[JSON] Bool

isSecureApi :: Proxy IsSecureApi
isSecureApi = Proxy

isSecureServer :: Server IsSecureApi
isSecureServer = isSecureDel
  where isSecureDel x = case x of
          True -> return True
          _ -> return False