From e273954f2766d3ccc5fa9c0ef47b64f51d88f377 Mon Sep 17 00:00:00 2001 From: Steve Bennett Date: Mon, 27 Jul 2009 11:21:58 +1000 Subject: Import various tinytcl compatibility packages Also fix 'file type' --- jim-file.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'jim-file.c') 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; } -- cgit v1.1