gdotdesign

/**
 * The first commented line is your dabblet’s title
 */

.wrapper {
	position: absolute;
	top: 0;
	left: 0;
	bottom: 0;
	right: 0;

gdotdesign

module Faye
  class ClientMiddleware
    def initialize(app)
      @app = app
    end
    def get_client
      @fc ||= Faye::Client.new('http://localhost:3000/faye')
    end
    def call(env)
      env['faye.client'] = get_client

gdotdesign

require "net/http"
require 'cgi'

class Hash
  # Create a Query String from a Hash
  def to_query
    def to_query
      map { |k,v|
        ::CGI.escape(k.to_s)+"="+::CGI.escape(v)
      }.join("&")

gdotdesign

Mediator = {
    events: {}
    listeners: {}
    fireEvent: (type,event)->
      if @listeners[type]
        @listeners[type].apply @, event
    addListener: (type,callback) ->
      @listeners[type] = callback
    removeListener: (type) ->
      delete @listeners[type]

gdotdesign

convertCurrency = (input) ->
  value = $(input).val().replace /[^\d\.]/g, ''
  float = parseFloat(value)
  float = 0 if isNaN(float)
  precision = parseInt(input.attr('data-precision'))
  if precision is 0
    val = float.toString().replace /\.\d*/, ''
  else
    val = float.toString().replace new RegExp("(\\.\\d{#{precision}})\\d*"), '$1'
  val = parseFloat val

gdotdesign

require "kemal"
require "process"
require "redis"
require "secure_random"

class Action
  def run
  end
end

gdotdesign

module Ext.Date where

{-| Utility functions for dates.

# Create
@docs now, createDate

# Querying
@docs month, daysInMonth, datesInMonth

gdotdesign

sendAsEffect : Signal.Address a -> a -> (() -> b) -> Effects.Effects b
sendAsEffect address value action =
  Signal.send address value
    |> Effects.task
    |> Effects.map action

gdotdesign

type Action
  = Tasks ()
  | RunTask
  
update : Action -> Model -> (Model, Effects.Effects Action) 
update action model =
  case action of 
    RunTask ->
      (model, sendAsEffect address value Tasks)

gdotdesign

type alias Model tag id err =
  { create : String -> List tag -> Task err tag
  , failAddress : Maybe (Signal.Address err)
  , remove : tag -> Task err tag
  , input : Ui.Input.Model
  , label : tag -> String
  , tags : List tag
  , removeable : Bool
  , id : tag -> id
  , disabled : Bool