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