Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Need to set type for Graph because it's used when checking routes.

  • Loading branch information...
commit 4681b404f3ee2e5f96bdc7df4b7b54c2c51dba28 1 parent 58b642a
Darrick Wiebe authored
Showing with 4 additions and 2 deletions.
  1. +4 −2 src/pacer/graph.clj
View
6 src/pacer/graph.clj
@@ -19,7 +19,7 @@
(defrecord Vertex [graph element])
(defrecord Edge [graph element])
-(defrecord Graph [name raw-graph encoder]
+(defrecord Graph [type name raw-graph encoder]
Object
(toString [g] (str @(:raw-graph g)))
PacerGraph
@@ -55,7 +55,9 @@
(defn tg []
- (Graph. "TinkerGraph"
+ ; seems awkward to have the first argument be :graph but I don't know
+ ; a way for records to have default values.
+ (Graph. :graph "TinkerGraph"
(atom (com.tinkerpop.blueprints.impls.tg.TinkerGraph.))
(atom (pacer/simple-encoder))))
Please sign in to comment.
Something went wrong with that request. Please try again.