git.iko.soy/project-m36
on master help sign in
switch transaction graph display to use BoolAtom instead of IntAtom
a1fd20eAgentM
ProjectM36/TransactionGraph.hs+2−2
compare with master
unifiedsplit
@@ -219,7 +219,7 @@ graphAsRelation (DisconnectedTransaction parentUUID _) graph@(TransactionGraph _
219 where
219 where
220 attrs = A.attributesFromList [Attribute "id" StringAtomType,
220 attrs = A.attributesFromList [Attribute "id" StringAtomType,
221 Attribute "parents" (RelationAtomType parentAttributes),
221 Attribute "parents" (RelationAtomType parentAttributes),
222− Attribute "current" IntAtomType,
222+ Attribute "current" BoolAtomType,
223 Attribute "head" StringAtomType
223 Attribute "head" StringAtomType
224 ]
224 ]
225 parentAttributes = A.attributesFromList [Attribute "id" StringAtomType]
225 parentAttributes = A.attributesFromList [Attribute "id" StringAtomType]
@@ -227,7 +227,7 @@ graphAsRelation (DisconnectedTransaction parentUUID _) graph@(TransactionGraph _
227 Left err -> Left err
227 Left err -> Left err
228 Right parentTransRel -> Right [StringAtom $ T.pack $ show (transactionUUID transaction),
228 Right parentTransRel -> Right [StringAtom $ T.pack $ show (transactionUUID transaction),
229 RelationAtom parentTransRel,
229 RelationAtom parentTransRel,
230− IntAtom $ if parentUUID == transactionUUID transaction then 1 else 0,
230+ BoolAtom $ parentUUID == transactionUUID transaction,
231 StringAtom $ case headNameForTransaction transaction graph of
231 StringAtom $ case headNameForTransaction transaction graph of
232 Just headName -> headName
232 Just headName -> headName
233 Nothing -> ""
233 Nothing -> ""
README.markdown+3−3
@@ -93,7 +93,7 @@ TutorialD (master): :branch devel
93Done.
93Done.
94```
94```
95
95
96−which creates a new head named "devel" in the transaction graph and resets the current "disconnected" transaction to refer to the
96+which creates a new head named "devel" in the transaction graph and resets the current "disconnected" transaction to refer to the new branch.
97
97
98 ```
98 ```
99TutorialD (devel): :rollback
99TutorialD (devel): :rollback
@@ -107,12 +107,12 @@ TutorialD (devel): :showGraph
107┌───────┬────────────────────────────────────┬──────────────────────────────────────┐
107┌───────┬────────────────────────────────────┬──────────────────────────────────────┐
108│current│id │parents │
108│current│id │parents │
109├───────┼────────────────────────────────────┼──────────────────────────────────────┤
109├───────┼────────────────────────────────────┼──────────────────────────────────────┤
110−│1 │1d064d54-cd2a-4a43-822a-cbd18cf7c4e8│┌────────────────────────────────────┐│
110+│True │1d064d54-cd2a-4a43-822a-cbd18cf7c4e8│┌────────────────────────────────────┐│
111│ │ ││id ││
111│ │ ││id ││
112│ │ │├────────────────────────────────────┤│
112│ │ │├────────────────────────────────────┤│
113│ │ ││4a4ee715-297d-49db-bfd1-afaefadc902b││
113│ │ ││4a4ee715-297d-49db-bfd1-afaefadc902b││
114│ │ │└────────────────────────────────────┘│
114│ │ │└────────────────────────────────────┘│
115−│0 │4a4ee715-297d-49db-bfd1-afaefadc902b│┌──┐ │
115+│False │4a4ee715-297d-49db-bfd1-afaefadc902b│┌──┐ │
116│ │ ││id│ │
116│ │ ││id│ │
117│ │ │ │
117│ │ │ │
118│ │ │└──┘ │
118│ │ │└──┘ │