blais

      (when (not token)
        (setq token (read-string "GitHub API token: "))
        (github-set-config "token" token))

blais

;; FIXME: This is missing from the stdlib.
(defn split-extension [filename]
  (let [index (.lastIndexOf filename ".")]
    (list (.substring filename 0 index) (.substring filename index))))

(defn get-basename [filename]
  (let [index (.lastIndexOf filename ".")]
    (.substring filename 0 index)))

(defn get-extension [filename]

blais

#!/usr/bin/env python3
"""Display a graph of dependencies between Ubuntu packages.
Reads a list of packages from either a file or stdin.
Outputs a PDF.
"""
__author__ = "Martin Blais <[email protected]>"

import argparse
import logging
import random

blais

#!/usr/bin/env python3
"""Slice ascii output along columns of empty space into a table.

Any vertical column of whitespace spanning the entire height of the input
generates a column separator.

Ideas:
- We could enhance this to detect 2+ spaces in the header field names as the
  only legitimate places for separation (to avoid false positives).
- Handle tabs.