Skip to content

Instantly share code, notes, and snippets.

Peter Lyons focusaurus

Block or report user

Report or block focusaurus

Hide content and notifications from this user.

Learn more about blocking users

Contact Support about this user’s behavior.

Learn more about reporting abuse

Report abuse
View GitHub Profile
@focusaurus
focusaurus / build.sh
Created Jan 26, 2017
Build script detects macOS and runs itself under docker
View build.sh
#!/usr/bin/env bash
cd "$(dirname "$0")/.."
if [[ "$(uname)" == "Darwin" ]]; then
docker build --tag foo-rpmbuild .
docker run --interactive --tty --rm \
--volume "${PWD}:/opt/docker-host" \
--volume "$(yarn cache dir | grep '^/'):/var/run/yarn-cache" \
foo-rpmbuild /opt/docker-host/bin/build.sh
exit
View WebDataPagination.elm
module Lab.WebDataPagination exposing (main)
import Html exposing (..)
import RemoteData as RD
import Json.Decode as JD
import Http
-- import Html.Attributes exposing (..)
@focusaurus
focusaurus / A.elm
Created Dec 14, 2016
Trying to handle blur event and get at event.target.textContent as a String
View A.elm
module A exposing (..)
import Debug
import Html
import Html exposing (..)
import Html.Attributes exposing (..)
import Html.Events exposing (onBlur, onClick, on)
import Json.Decode as JD
import Json.Encode as JE
@focusaurus
focusaurus / A.elm
Created Dec 5, 2016
Decode JSON string enum into elm union type
View A.elm
module A exposing (..)
import Json.Decode as JD
import Json.Encode as JE
type alias User =
{ id : Int
, theme : Theme
}
@focusaurus
focusaurus / sign-in.elm
Last active Nov 7, 2016
How to handle Http POST
View sign-in.elm
module SignIn exposing (..)
import Html exposing (..)
import Html.App
import Http
import Json.Decode
import Task
type alias Model =
@focusaurus
focusaurus / package.json
Created Oct 10, 2016
atom-format-shell package.json
View package.json
{
"activationHooks": [
"language-shellscript:grammar-used"
],
"author": "Peter Lyons <pete@peterlyons.com> (http://peterlyons.com)",
"bugs": {
"url": "https://github.com/focusaurus/atom-format-shell/issues"
},
"configSchema": {
"shfmtPath": {
View functional web framework
function listUsers (req, callback) {
// use req as immutable input
// standard node error-first callback API
// success value of callback is a response-shaped object with properties: statusCode, headers, body
}
// I haven't built one of these, just riffing.
// Look at clojure and other functional languages for examples that might
// have reasonable counterparts in "functional-light" JS
// Thinking more along the lines of react/redux reducer style
View promises-are-always-async.js
Promise.resolve('foo').then(console.log)
console.log('bar')
// outputs:
// bar
// foo
@focusaurus
focusaurus / .babelrc
Created Jan 28, 2016
iron-node and babel step through
View .babelrc
{
"presets": ["es2015", "stage-0"],
"plugins": [
"transform-decorators-legacy",
"transform-export-extensions"
]
}
@focusaurus
focusaurus / comcast.sh
Created Sep 17, 2015
using the "comcast" utility to throttle network traffic to a specific application
View comcast.sh
# https://github.com/tylertreat/Comcast
# In this example, the application I want to throttle is on TCP port 9110
comcast="${HOME}/projects/comcast/bin/comcast"
throttle() {
local profile="${1-wifi}"
local bandwidth=30000
local latency=40
You can’t perform that action at this time.