cldwalker

(ns explore-datafy-nav
  "Sample code demonstrating naving around a random graph of data.
   The graph very likely will have circular references, which is not a problem.
   To see the results, execute the entire file.
   Each step in the nav process will be printed out, as well as the initial db.
   Subsequent executions will generate a new random db."
  (:require [clojure.datafy :refer [datafy nav]]
            [clojure.pprint]))

(defn generate-db

cldwalker

(defroutes chapter-routes
  ;; Example story-slug:   42-my-first-story
  ;; Example chapter-slug: 99-introduction
  ;; (util/parse-uid "42-my-first-story") -> 42
  ;; (util/parse-uid "99-introduction")   -> 99
  (GET "/chapters/:chapter-slug" [story-slug chapter-slug]
    (let [story   (some-> story-slug util/parse-uid db/find-story-by-uid)
          chapter (some-> chapter-slug util/parse-uid db/find-chapter-by-uid)]
      (and story chapter
        (zizkov.views/show-chapter layout story chapter)))))

cldwalker

# In example.rb
module Example
  extend self
  # This method does something
  def command1(arg1, arg2, options = {})

  end

  # This method does something else
  def command2(arg1, arg2, options = {})

cldwalker

#!/usr/bin/env ruby
module Chars
  extend self

  def scale(args, options={})
    scale = options[:scale]
    chars = args.map { |x| Chars.char(x.to_i).map { |row| row.split("") } }
    print_chars scale_vertically(scale_horizontally(chars, scale), scale)
  end