aboutsummaryrefslogtreecommitdiff
path: root/jim-file.c
diff options
context:
space:
mode:
authorSteve Bennett <steveb@workware.net.au>2009-07-27 11:21:58 +1000
committerSteve Bennett <steveb@workware.net.au>2010-10-15 10:11:01 +1000
commite273954f2766d3ccc5fa9c0ef47b64f51d88f377 (patch)
tree696598c5060e4d8995fe54a78957b224962738fe /jim-file.c
parent1bb6166bdb5e2a92b50e0ea178fa55a5f0d7261f (diff)
downloadjimtcl-e273954f2766d3ccc5fa9c0ef47b64f51d88f377.zip
jimtcl-e273954f2766d3ccc5fa9c0ef47b64f51d88f377.tar.gz
jimtcl-e273954f2766d3ccc5fa9c0ef47b64f51d88f377.tar.bz2
Import various tinytcl compatibility packages
Also fix 'file type'
Diffstat (limited to 'jim-file.c')
-rw-r--r--jim-file.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/jim-file.c b/jim-file.c
index beb7147..f3994d7 100644
--- a/jim-file.c
+++ b/jim-file.c
@@ -447,7 +447,7 @@ static int file_cmd_type(Jim_Interp *interp, int argc, Jim_Obj *const *argv)
if (file_lstat(interp, argv[0], &sb) != JIM_OK) {
return JIM_ERR;
}
- Jim_SetIntResult(interp, sb.st_mode);
+ Jim_SetResultString(interp, GetFileType((int)sb.st_mode), -1);
return JIM_OK;
}