changeset 660:347ea2bca687

Force remove spaces in filename
author HIROSE Yuuji <yuuji@gentei.org>
date Mon, 11 May 2020 23:01:19 +0900
parents a36a2c3b3056
children 14a7c23f3f06
files mpsplit.pl
diffstat 1 files changed, 1 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/mpsplit.pl	Mon May 11 20:08:29 2020 +0900
+++ b/mpsplit.pl	Mon May 11 23:01:19 2020 +0900
@@ -30,6 +30,7 @@
     if ($fn =~ /^([^\/]*)$/) {
       $fn = $1;
     }
+    $fn =~ s/ /_/g;
     open(OUT, ">$dir/$fn");
       print OUT $body;
     close(OUT);

yatex.org