Skip to content

Instantly share code, notes, and snippets.

Philipp Meier ordnungswidrig

Block or report user

Report or block ordnungswidrig

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
View nemldingAuthnRequest.xml
View horriblehaskell.hs
{-# LANGUAGE DuplicateRecordFields #-}
-- how to resolve the duplication in CreateUser, BasicUser and UpdateUser
-- without changing everything to `Maybe String`?
data Address = Address { street :: String
, zip :: String
, city :: String
, state :: String
} deriving (Show)
ordnungswidrig / pres.el
Created Dec 4, 2018
presentation helper for live demo in emacs
View pres.el
(defun c6e/pres-forward ()
(let ((saved (point)))
(let ((beg (point)))
(search-forward-regexp "^;;; " nil t)
(if (= beg (point))
(goto-char saved)
(recenter 0)
ordnungswidrig / gherkinqqwertzde7.json
Created Jun 27, 2017
Gherkin german QWERTZ layout
View gherkinqqwertzde7.json
View keymap-ergodox-billy-qwertz.h
#include "bootloader.h"
#include "keymap_common.h"
const uint8_t PROGMEM keymaps[][MATRIX_ROWS][MATRIX_COLS] = {
KEYMAP( // Layer 0
ESC, 1, 2, 3, 4, 5, EQL, // 7
TAB, Q, W, E, R, T, FN1, // 7
LCTRL, A, S, D, F, G, // 6
LSFT, Z, X, C, V, B, FN2, // 7
ordnungswidrig / color-overlay-calc-klipse.cljs
Created Feb 2, 2017
Mutliple color overlay functions rendered with reagent in kilpse
View color-overlay-calc-klipse.cljs
;; color definitions in css rgba format
(def base-color [60 151 35 1])
(def overlays [[255 255 255 .23]
[255 255 255 .61]
[255 255 255 1]])
(require '[clojure.string :as s]
'[reagent.core :as reagent])

Apex architecture on documents, forms and modality


During the execution of workflows at certain points information must be presented to the user and information must be gathered from the user. The actualy input method depends on the device that is used by a user, ranging from a web application to filling out a paper form.

The attributes of different devices are collected in “modalities” which describes a group of devices sharing common properties.

The data that shall be collected varies in shape and size, ranging from a single decision (“checkbox”) over what is a

ordnungswidrig / bananas.clj
Created Jul 20, 2015
Break if control-ch contains a value
View bananas.clj
(def capacity 100)
(let [conn (d/connect db-uri)
tx-report-ch (chan 100)
control-ch (chan)]
(log/info "Started tx-report thread for " db-uri)
(try (let [queue (d/tx-report-queue conn)]
(while (= ::continue (alts! [control-ch] ::continue))
(when-let [tx-result (.take queue)]
ordnungswidrig / bye-bye-rfc2616.svg
Created Jun 25, 2015
Bye Bye RFC 2616. Hello RFC 7230!
View bye-bye-rfc2616.svg
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
View redirect.clj
(defresource redirected
:exists? false
:existed? true
:moved-permanently? (fn [_] {:location ""}))
You can’t perform that action at this time.