diff options
-rw-r--r-- | engines/director/lingo/lingo-builtins.cpp | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/engines/director/lingo/lingo-builtins.cpp b/engines/director/lingo/lingo-builtins.cpp index 1f843f5f4b..861dc0a2d3 100644 --- a/engines/director/lingo/lingo-builtins.cpp +++ b/engines/director/lingo/lingo-builtins.cpp @@ -1663,7 +1663,17 @@ void LB::b_true(int nargs) { } void LB::b_version(int nargs) { - g_lingo->push(Datum(g_director->getVersion())); + switch (g_director->getVersion()) { + case 3: + g_lingo->push(Datum(new Common::String("3.1.1"))); // Mac + break; + case 4: + g_lingo->push(Datum(new Common::String("4.0"))); // Mac + break; + default: + error("Unsupported Director for 'version'"); + break; + } } /////////////////// |