From 90c1ee36f6c110265266b47bd474468dc3f2c77d Mon Sep 17 00:00:00 2001
From: Roland van Laar <roland@rolandvanlaar.nl>
Date: Wed, 17 Jun 2020 21:47:02 +0200
Subject: [PATCH] DIRECTOR: fix where dumped scripts starts with '-'

Prepend dumped scripts with 'stream' when the script resources
weren't loaded via a file but a stream.
---
 engines/director/archive.cpp | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/engines/director/archive.cpp b/engines/director/archive.cpp
index 08c94765ead..dd9f5cc40ee 100644
--- a/engines/director/archive.cpp
+++ b/engines/director/archive.cpp
@@ -508,8 +508,13 @@ bool RIFXArchive::openStream(Common::SeekableReadStream *stream, uint32 startOff
 				data = (byte *)malloc(resources[i].size);
 				dataSize = resources[i].size;
 			}
+			Common::String prepend;
+			if (_fileName.size() != 0)
+				prepend = _fileName;
+			else
+				prepend = "stream";
 
-			Common::String filename = Common::String::format("./dumps/%s-%s-%d", _fileName.c_str(), tag2str(resources[i].tag), i);
+			Common::String filename = Common::String::format("./dumps/%s-%s-%d", prepend.c_str(), tag2str(resources[i].tag), i);
 			stream->read(data, len);
 
 			if (!out.open(filename)) {