summaryrefslogtreecommitdiff
path: root/amiga/arexx.c
diff options
context:
space:
mode:
Diffstat (limited to 'amiga/arexx.c')
-rw-r--r--amiga/arexx.c11
1 files changed, 9 insertions, 2 deletions
diff --git a/amiga/arexx.c b/amiga/arexx.c
index 183b8fc98..3b386d3ad 100644
--- a/amiga/arexx.c
+++ b/amiga/arexx.c
@@ -142,8 +142,15 @@ void ami_arexx_handle(void)
void ami_arexx_execute(char *script)
{
- LOG(("Executing script: %s", script));
- IDoMethod(arexx_obj, AM_EXECUTE, script, NULL, NULL, NULL, NULL, NULL);
+ char full_script_path[1025];
+ BPTR lock;
+
+ if(lock = Lock(script, ACCESS_READ)) {
+ DevNameFromLock(lock, full_script_path, 1024, DN_FULLPATH);
+ LOG(("Executing script: %s", full_script_path));
+ IDoMethod(arexx_obj, AM_EXECUTE, full_script_path, NULL, NULL, NULL, NULL, NULL);
+ UnLock(lock);
+ }
}
void ami_arexx_cleanup(void)