diff --git a/exec/str_cmds.src b/exec/str_cmds.src index 9746cbfa1f469c017cef5c89ee2445c97c3881e0..840f7b693fb43df4fbcc9f66320dd5efd566b8c3 100644 --- a/exec/str_cmds.src +++ b/exec/str_cmds.src @@ -16,6 +16,10 @@ # or similar function) before this module is loaded. !include nodedefs.inc +!include file_io.inc + +str fname +int file # Remove any trailing spaces @@ -134,7 +138,11 @@ if_true if_true shift_str 4 call get_arg - exec command /c rem >> %jqnet/%s.now + set fname "%jqnet/%s.now" + fopen file O_WRONLY|O_CREAT|O_DENYNONE fname + if_true + fclose file + end_if end_if return end_if