Commit a8affa1c authored by Stefan Berghofer's avatar Stefan Berghofer Committed by MARCHE Claude
Browse files

Avoid generating names ending with underscores

parent c73e212f
......@@ -49,7 +49,7 @@ let black_list =
["o"; "O"]
let fresh_printer () =
let isanitize = sanitizer char_to_alpha char_to_alnumus in
let isanitize = sanitizer' char_to_alpha char_to_alnumus char_to_alnum in
create_ident_printer black_list ~sanitizer:isanitize
let iprinter = fresh_printer ()
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment