From c8f72e5eec2bb74c593b35ab3b65c3ccdc3b84a8 Mon Sep 17 00:00:00 2001
From: Uwe Risse <dg2ycb@gmx.de>
Date: Sun, 12 May 2024 08:35:21 +0200
Subject: [PATCH] Make decoder.f90 functional on Windows if exe_dir contains a
 space. (Temporary commit until we have a better solution).

---
 lib/decoder.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/decoder.f90 b/lib/decoder.f90
index 5d4834333..06f35209e 100644
--- a/lib/decoder.f90
+++ b/lib/decoder.f90
@@ -153,7 +153,7 @@ subroutine multimode_decoder(ss,id2,params,nfsample)
            if(cmnd(i:i).eq.char(92)) cmnd(i:i)='/'
         enddo
         call execute_command_line(cmnd,exitstat=ierr)
-        if(ierr.ne.0) print*,trim(cmnd),' failed'
+        if(ierr.ne.0) call execute_command_line('.\sfrx '//'"'//trim(temp_dir)//'/fort.47"')
      else
         call timer('decft8  ',0)
         newdat=params%newdat