let
quote_filename_if_needed s =
if
is_simple_filename s
then
s
else
Filename
.quote s