mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2025-05-29 04:42:28 -04:00
Protect against path names with embedded blanks.
This commit is contained in:
parent
a003ac530b
commit
d388ee85dd
@ -147,8 +147,9 @@ subroutine multimode_decoder(ss,id2,params,nfsample)
|
|||||||
access='stream')
|
access='stream')
|
||||||
write(47) params%yymmdd,params%nutc,id2(1:20),id2(1:180000)
|
write(47) params%yymmdd,params%nutc,id2(1:20),id2(1:180000)
|
||||||
close(47)
|
close(47)
|
||||||
cmnd=trim(exe_dir)//'/sfrx '//trim(temp_dir)//'/fort.47'
|
cmnd='"'//trim(exe_dir)//'/sfrx" "'//trim(temp_dir)//'/fort.47"'
|
||||||
call execute_command_line(cmnd)
|
call execute_command_line(cmnd,exitstat=ierr)
|
||||||
|
if(ierr.ne.0) print*,trim(cmnd),' failed'
|
||||||
else
|
else
|
||||||
call timer('decft8 ',0)
|
call timer('decft8 ',0)
|
||||||
newdat=params%newdat
|
newdat=params%newdat
|
||||||
|
Loading…
x
Reference in New Issue
Block a user