diff --git a/changelog b/changelog
--- a/changelog
+++ b/changelog
@@ -1,3 +1,7 @@
+texmath (0.8.2.2)
+
+  * Handle `.` after number with no following digits.
+
 texmath (0.8.2.1)
 
   * Handle bare hyphen in `\text{...}`.  Closes jgm/pandoc#2274.
diff --git a/src/Text/TeXMath/Readers/TeX.hs b/src/Text/TeXMath/Readers/TeX.hs
--- a/src/Text/TeXMath/Readers/TeX.hs
+++ b/src/Text/TeXMath/Readers/TeX.hs
@@ -244,15 +244,13 @@
 inbrackets = (brackets $ manyExp $ notFollowedBy (char ']') >> expr)
 
 number :: TP Exp
-number = lexeme $ ENumber <$> decimalNumber
-  where decimalNumber = try $ do
+number = lexeme $ ENumber <$> try decimalNumber
+  where decimalNumber = do
           xs <- many digit
-          pt <- option "" (string ".")
-          if null pt
-             then if null xs
-                     then mzero
-                     else return xs
-             else ((xs ++ pt) ++) <$> many1 digit
+          ys <- option [] $ try (char '.' >> (('.':) <$> many1 digit))
+          case xs ++ ys of
+               []  -> mzero
+               zs  -> return zs
 
 enclosure :: TP Exp
 enclosure = basicEnclosure <|> scaledEnclosure <|> delimited
diff --git a/tests/readers/tex/23.native b/tests/readers/tex/23.native
new file mode 100644
--- /dev/null
+++ b/tests/readers/tex/23.native
@@ -0,0 +1,1 @@
+[ENumber "1",ESymbol Ord "."]
diff --git a/tests/src/23.tex b/tests/src/23.tex
new file mode 100644
--- /dev/null
+++ b/tests/src/23.tex
@@ -0,0 +1,1 @@
+1.
diff --git a/tests/writers/23.mml b/tests/writers/23.mml
new file mode 100644
--- /dev/null
+++ b/tests/writers/23.mml
@@ -0,0 +1,7 @@
+<?xml version='1.0' ?>
+<math display="block" xmlns="http://www.w3.org/1998/Math/MathML">
+  <mrow>
+    <mn>1</mn>
+    <mo>.</mo>
+  </mrow>
+</math>
diff --git a/tests/writers/23.omml b/tests/writers/23.omml
new file mode 100644
--- /dev/null
+++ b/tests/writers/23.omml
@@ -0,0 +1,16 @@
+<?xml version='1.0' ?>
+<m:oMathPara>
+  <m:oMathParaPr>
+    <m:jc m:val="center" />
+  </m:oMathParaPr>
+  <m:oMath>
+    <m:r>
+      <m:rPr />
+      <m:t>1</m:t>
+    </m:r>
+    <m:r>
+      <m:rPr />
+      <m:t>.</m:t>
+    </m:r>
+  </m:oMath>
+</m:oMathPara>
diff --git a/tests/writers/23.tex b/tests/writers/23.tex
new file mode 100644
--- /dev/null
+++ b/tests/writers/23.tex
@@ -0,0 +1,1 @@
+1.
diff --git a/texmath.cabal b/texmath.cabal
--- a/texmath.cabal
+++ b/texmath.cabal
@@ -1,5 +1,5 @@
 Name:                texmath
-Version:             0.8.2.1
+Version:             0.8.2.2
 Cabal-Version:       >= 1.10
 Build-type:          Simple
 Synopsis:            Conversion between formats used to represent mathematics.
