From 5dd38b86608ab227a3a38a6c4fbfbb4bad745942 Mon Sep 17 00:00:00 2001
From: Bastien Bouclet
Date: Sun, 8 Jul 2018 21:55:09 +0200
Subject: MOHAWK: MYST: Play complete audio clip when changing the boiler
 pressure

Fixes Trac#10607.
---
 engines/mohawk/myst_stacks/myst.cpp | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/engines/mohawk/myst_stacks/myst.cpp b/engines/mohawk/myst_stacks/myst.cpp
index 647676e304..2e70778322 100644
--- a/engines/mohawk/myst_stacks/myst.cpp
+++ b/engines/mohawk/myst_stacks/myst.cpp
@@ -2025,6 +2025,10 @@ void Myst::o_boilerIncreasePressureStop(uint16 var, const ArgumentsArray &args)
 	_boilerPressureIncreasing = false;
 	_state.treeLastMoveTime = _vm->getTotalPlayTime();
 
+	while (_vm->_sound->isEffectPlaying()) {
+		_vm->doFrame();
+	}
+
 	if (_state.cabinPilotLightLit == 1) {
 		if (_state.cabinValvePosition > 0)
 			_vm->_sound->playBackground(8098, 49152);
@@ -2096,6 +2100,10 @@ void Myst::o_boilerDecreasePressureStop(uint16 var, const ArgumentsArray &args)
 	_boilerPressureDecreasing = false;
 	_state.treeLastMoveTime = _vm->getTotalPlayTime();
 
+	while (_vm->_sound->isEffectPlaying()) {
+		_vm->doFrame();
+	}
+
 	if (_state.cabinPilotLightLit == 1) {
 		if (_state.cabinValvePosition > 0)
 			_vm->_sound->playBackground(8098, 49152);
-- 
cgit v1.2.3