This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
[ | |
{ | |
"window_class": "gvim", | |
"fa_icon": "pen-nib" | |
}, | |
{ | |
"window_class": "telegramdesktop", | |
"fa_icon": "telegram" | |
}, | |
{ |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/bin/bash | |
set -e | |
# FEATURES | |
# - Doesn't show the sink that is already the default | |
# - Automatically switches all running input sinks when switching the default sink | |
# Get the current default sink | |
SINK_DEFAULT=$(pactl info | ag "Default Sink" | ag -o "(?!.*:)[^\s].*") |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
{ | |
"border": "pixel", | |
"current_border_width": -1, | |
"deco_rect": { | |
"height": 0, | |
"width": 0, | |
"x": 0, | |
"y": 0 | |
}, | |
"floating": "auto_off", |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
{ | |
"border": "pixel", | |
"current_border_width": 2, | |
"deco_rect": { | |
"height": 22, | |
"width": 564, | |
"x": 0, | |
"y": 44 | |
}, | |
"floating": "auto_off", |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env bash | |
# | |
# This is sp, the command-line Spotify controller. It talks to a running | |
# instance of the Spotify Linux client over dbus, providing an interface not | |
# unlike mpc. | |
# | |
# Put differently, it allows you to control Spotify without leaving the comfort | |
# of your command line, and without a custom client or Premium subscription. | |
# |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/bin/bash | |
STD_LIB=`ocamlc -config | grep 'standard_library:' | gawk '{print $2}'` | |
LIBS=`dirname ${STD_LIB}` | |
INCLUDE_DIRS="-I ${LIBS}/result -I ${LIBS}/ppx_deriving -I ${LIBS}/lens" | |
PPX="${LIBS}/ppx_deriving/ppx_deriving ${LIBS}/lens/lens_ppx_deriving.cma" | |
ocamlc -c -g -annot -bin-annot -o hello_lens.cmi \ |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
open ReasonReact; | |
open Utils; | |
type state = { | |
shown : bool, | |
value : string | |
}; | |
let file_dialog = ReasonReact.reducerComponent("InputDialog"); |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
let rec rev ?(acc = []) xs = | |
match xs with | |
| hd::tl -> rev ~acc:(hd::acc) tl | |
| [] -> acc |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
open Core.Std | |
open Async.Std | |
open Async_ssl.Std | |
open Log.Global | |
open Re2.Std | |
(* ocamlbuild -use-ocamlfind -cflag -thread -lflag -thread -pkgs re2,async_ssl test_ssl4.native *) |
NewerOlder