Fred Alger phred

I hereby claim:

To claim this, I am signing this object:

Emacs

M-/ binds to dabbrev-expand, it’s very much like Vim’s insert mode C-n

Not enabled by default, tries to complete whatever’s at the point

M-/ binds to dabbrev-expand, it’s very much like Vim’s insert mode C-n

Not enabled by default, tries to complete whatever’s at the point

	#lang racket
	(require racket/dict)
	(require db)
	(define ghost (sqlite3-connect #:database "ghost/content/data/ghost.db"))

	(define posts-result
	(query ghost "select published_at, slug, title, markdown from posts where status='published'"))

	(define posts (rows->dict posts-result #:key "slug" #:value '#("published_at" "title" "markdown")))

	// Rebuilding the old fidget interface using hyperapp.js.org (h), replacing the old react
	// For comparison, see: https://github.com/phred/fidget/blob/master/index.html#L16-L121

	// Nothing's wired up, it's just a text editor that shows you what line you have selected
	// and echoes the line's content in a column to the right.

	import { h, app } from "hyperapp"

	var getCurrentLine = function (node) {
	var lineNum = node.value.substr(0, node.selectionStart).split("\n").length - 1;

	/*
	FLAT UI Flavored Adminer Theme by M. Mahbubur Rahman ([email protected])
	Screenshot : http://d.pr/i/cznH
	Based on work by : Lukáš Brandejs
	https://raw.github.com/vrana/adminer/master/designs/ng9/adminer.css
	*/

	@import url(https://fonts.googleapis.com/css?family=Roboto:400,600);

	: sides ( [] -- sides ) {
	[ [ first ] [ second ] bi 2array ]
	[ [ second ] [ third ] bi 2array ]
	[ [ first ] [ third ] bi 2array ]
	} cleave 3array ;

	: area ( side -- area ) first2 * 2 * ;
	: extra ( sides -- extra ) first first2 * ;
	: side-area ( side -- area ) first2 * 2 * ;
	: total-paper ( dims -- area ) sides [ area ] [ extra ] bi + ;

	fff.red {
	header / {
	Strict-Transport-Security "max-age=31536000; includeSubDomains"
	Content-Security-Policy "default-src https:*"
	Public-Key-Pins "pin-sha256=\"ckOIjdimiwD3mfMmkmCh7uiJCBtXvoqoBoKKB1K5UIM=\"; pin-sha256=\"QiTyymM4e635OgWkx9d7nq5xvEuqmgV7HiDjIIGyymo=\"; max-age=2592000"
	X-Frame-Options SAMEORIGIN
	X-XSS-Protection "1; mode=block"
	X-Content-Type-Options nosniff
	}
	}