Change severity of some messages

ianhinder · Mar 12, 2014 · 32f4042 · 32f4042
1 parent ae5b3f6
commit 32f4042
Showing 1 changed file with 5 additions and 3 deletions.
diff --git a/Tools/MathematicaMisc/RunKranc.m b/Tools/MathematicaMisc/RunKranc.m
@@ -68,7 +68,7 @@
 
   (* Warn about and replace PD *)
   If[MemberQ[contents, PD, Infinity, Heads -> True],
-    InfoMessage[DebugQuiet, "PD is a reserved symbol and its use in a calculation is deprecated"];
+    InfoMessage[Warnings, "PD is a reserved symbol and its use in a calculation is deprecated"];
     contents = contents /. PD -> KrancPD;
   ];
 
@@ -109,8 +109,10 @@
   replacements = MapThread[Rule, {tensors, tensorsWithIndices}] /. (_ -> {}) -> Sequence[];
   replacements = replacements /. {-TangentKrancManifold :> DummyIn[-TangentKrancManifold], TangentKrancManifold :> DummyIn[TangentKrancManifold]};
 
-  InfoMessage[DebugQuiet, "Found tensors in DefineTensor without their indices specified. " <>
-                          "Assuming they are given by: ", replacements];
+  If[replacements =!= {},
+    InfoMessage[Warnings, "Found tensors in DefineTensor without their indices specified explicitly."];
+    InfoMessage[Info, "Assuming they are given by: ", replacements];
+  ];
   ReleaseHold[contents /.
     {
      HoldPattern[DefineTensor[t_]] :> DefineTensor[t /. replacements],