From 8f77d9df4aac53830ae45d64ad0ddfe2970a658a Mon Sep 17 00:00:00 2001
From: wm4 <wm4@nowhere>
Date: Thu, 14 Aug 2014 19:30:35 +0200
Subject: lua: allow disabling suspend

I'd like to enable this by default, but unfortunately the OSC seems to
have some problems with it.
---
 player/lua/defaults.lua | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/player/lua/defaults.lua b/player/lua/defaults.lua
index 37c05dea92..1ae8dd965d 100644
--- a/player/lua/defaults.lua
+++ b/player/lua/defaults.lua
@@ -352,9 +352,13 @@ local function call_event_handlers(e)
     end
 end
 
+mp.use_suspend = true
+
 function mp.dispatch_events(allow_wait)
     local more_events = true
-    mp.suspend()
+    if mp.use_suspend then
+        mp.suspend()
+    end
     while mp.keep_running do
         local wait = process_timers()
         if wait == nil then
@@ -374,7 +378,9 @@ function mp.dispatch_events(allow_wait)
         local e = mp.wait_event(wait)
         -- Empty the event queue while suspended; otherwise, each
         -- event will keep us waiting until the core suspends again.
-        mp.suspend()
+        if mp.use_suspend then
+            mp.suspend()
+        end
         more_events = (e.event ~= "none")
         if more_events then
             call_event_handlers(e)
-- 
cgit v1.2.3