diff --git a/M2/Macaulay2/m2/mathml.m2 b/M2/Macaulay2/m2/mathml.m2
index 75c0cf630e..c69be5be09 100644
--- a/M2/Macaulay2/m2/mathml.m2
+++ b/M2/Macaulay2/m2/mathml.m2
@@ -60,7 +60,7 @@ mathML FunctionApplication := m -> (
      else concatenate (bigParenthesize mfun, bigParenthesize margs)
      )
 mathML MatrixExpression := x -> concatenate( "<mrow><mo>(</mo>", mtableML x, "<mo>)</mo></mrow>", newline )
-mathML Minus := v -> concatenate( "<mo>-</mo>", mathML v#0)
+mathML Minus := v -> concatenate( "<mrow><mo>-</mo>", mathML v#0, "</mrow>")
 mathML Divide := x -> concatenate("<mfrac>", mathML x#0, mathML x#1, "</mfrac>")
 mathML OneExpression := x -> "<mn>1</mn>"
 mathML ZeroExpression := x -> "<mn>0</mn>"