>> FUNCTION RunShell( aCmd ) >> LOCAL cShellCmd >> LOCAL cExt >> LOCAL cPrefix >> LOCAL fhnd >> LOCAL cCmdFileName >> LOCAL cCmdFile >> LOCAL tmp >> >> #if defined( __PLATFORM__WINDOWS ) >> cShellCmd := hb_getenv( "COMSPEC" ) + " /C " >> cExt := ".bat" >> cPrefix := "" >> #elif defined( __PLATFORM__OS2 ) >> cShellCmd := hb_getenv( "COMSPEC" ) + " /C " >> cExt := ".cmd" >> cPrefix := "" >> #elif defined( __PLATFORM__UNIX ) >> cShellCmd := "" >> cExt := ".sh" >> cPrefix := "#!/bin/sh" + hb_osNewLine() >> #endif >> >> IF ! Empty( cExt ) >> >> cCmdFile := cPrefix >> FOR EACH tmp IN aCmd >> cCmdFile += tmp + hb_osNewLine() >> NEXT >> >> IF ( fhnd := hb_FTempCreateEx( @cCmdFileName, NIL, NIL, cExt ) ) != >> F_ERROR >> FWrite( fhnd, cCmdFile ) >> FClose( fhnd ) >> hb_processrun( cShellCmd + cCmdFileName ) >> FErase( cCmdFileName ) >> ENDIF >> ENDIF >> --- >> >> (I didn't test it, especially not on *nix, but I hope you get the idea) >> > > Dropped. > Still I do not know how to cover for *nix. > Hopefully Vailton will do it.
Thank you. Please change to 'cShellCmd := hb_getenv( "SHELL" ) + " "' for __PLATFORM__UNIX and it should work. Brgds, Viktor _______________________________________________ Harbour mailing list (attachment size limit: 40KB) [email protected] http://lists.harbour-project.org/mailman/listinfo/harbour
