diff --git a/VERSION b/VERSION index 7e549f91..0a172f3d 100644 --- a/VERSION +++ b/VERSION @@ -1 +1 @@ -8.3.184 +8.3.185 diff --git a/utils/main.c b/utils/main.c index 06e06c7d..e60aa77e 100644 --- a/utils/main.c +++ b/utils/main.c @@ -413,7 +413,16 @@ mainDoArgs(argc, argv) #endif #ifdef MAGIC_WRAPPER if (!strcasecmp(c, ".tcl")) + { CurrentName->fn_type = FN_TCL_SCRIPT; + /* Behavior: If a .tcl file is passed on the + * command line, then all following arguments + * are assumed to be arguments of the script, + * and not to be processed as additional + * input file types. + */ + break; + } #endif } }