TensorTools.m: Correct redefinitions of connections

ianhinder · Jun 11, 2011 · c5a7356 · c5a7356
1 parent 419ef7b
commit c5a7356
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/Tools/CodeGen/TensorTools.m b/Tools/CodeGen/TensorTools.m
@@ -724,8 +724,7 @@
    Christoffel symbol. *)
 DefineConnection[cd_, pd_, gamma_] :=
   Module[{},
-    connections = Join[connections, {{cd, pd, gamma}}]];
-
+    connections = Append[DeleteCases[connections,{cd,_,_}], {cd, pd, gamma}]];
 
 (* Things we can do with covariant derivatives: