diff --git a/cpdf.ml b/cpdf.ml
index 3a098a8..8d53b22 100644
--- a/cpdf.ml
+++ b/cpdf.ml
@@ -283,7 +283,6 @@ let rec mk_numbers pdf endpage lexemes =
   | [Pdfgenlex.LexName "reverse"] ->
        rev (ilist 1 endpage)
   | toks ->
-      flprint "Unknown tokens\n";
       let ranges = splitat_commas toks in
         if ranges = [toks] then raise PageSpecBadSyntax else
           flatten (map (mk_numbers pdf endpage) ranges)