zentrope

func xmlDocument(url: String) -> Document? {
    var doc: Document?
    let semaphore = DispatchSemaphore(value: 0)

    AF.request(url).response { response in
        if let data = response.data, let xml = String(data: data, encoding: .utf8) {
            do {
                doc = try SwiftSoup.parse(xml, "", Parser.xmlParser())
            } catch {
                print("error: \(error.localizedDescription)")

zentrope

    override func loadView() {

        let view = NSView(frame: .zero)
        view.addSubview(vfxView)
        view.addSubview(webView)

        vfxView.translatesAutoresizingMaskIntoConstraints = false

        webView.configuration.preferences.javaScriptEnabled = true
        webView.setValue(false, forKey: "drawsBackground")

zentrope

//
//  AppDelegate.swift
//

import Cocoa

@NSApplicationMain
class AppDelegate: NSObject, NSApplicationDelegate {

    private var preferencesWindow = NSWindowController()

zentrope

private func setMode(_ isDark: Bool) {
    let mode = isDark ? "add" : "remove"
    let script = "document.body.classList.\(mode)(\"dark\");"

    webView.evaluateJavaScript(script) { result, error in
        if let err = error {
            os_log("%{public}s", log: logger, type: .error, "js error: \(err).")
        }
    }
}

zentrope

Build emacs on macOS

Build from scratch because most of the packages you use have updated to the nearly-completed next version, so why not pull that?

An alternative is to use home brew HEAD, but this is more fun.

Xcode

Probably should have Xcode installed, but at least try:

zentrope

(ns client.ui
  (:require
   [goog.i18n.NumberFormat.Format])
  (:import
   (goog.i18n NumberFormat)
   (goog.i18n.NumberFormat Format)))

(def nff
  (NumberFormat. Format/DECIMAL))

zentrope

(ns engine.lib.utils
  (:require
    [clojure.string :as s]
    [clojure.java.io :as io]))

;;-----------------------------------------------------------------------------

(def ^:private path-sep
  (System/getProperty "path.separator"))

zentrope

package main

import (
	"encoding/json"
	"io"
	"log"
	"net/http"
	"os"
	"os/signal"
)

zentrope

(ns ls.core
  (:gen-class)
  (:refer-clojure :exclude [==])
  (:require [clojure.core.logic :refer :all]
            [clojure.core.logic.pldb :refer :all]))

;;-----------------------------------------------------------------------------
;; Interesting Links
;;
;; http://michaelrbernste.in/2013/05/12/featurec-and-maps.html

zentrope

> lein deploy clojars
Created /Users/keith/Desktop/quiescent/target/quiescent-0.2.2.jar
Wrote /Users/keith/Desktop/quiescent/pom.xml

You need a passphrase to unlock the secret key for
user: "Keith Irwin <keith@zentrope.com>"
2048-bit RSA key, ID B0FDA7A9, created 2015-12-19

                  
You need a passphrase to unlock the secret key for