LibWeb: Only take runnable tasks from the HTML task queue

We were previously willing to execute tasks before they had become
runnable.

1 files changed, 10 insertions, 1 deletions

diff --git a/Userland/Libraries/LibWeb/HTML/EventLoop/TaskQueue.cpp b/Userland/Libraries/LibWeb/HTML/EventLoop/TaskQueue.cpp
index 50c8598d67..51fb07df29 100644
--- a/Userland/Libraries/LibWeb/HTML/EventLoop/TaskQueue.cpp
+++ b/Userland/Libraries/LibWeb/HTML/EventLoop/TaskQueue.cpp
@@ -20,8 +20,17 @@ TaskQueue::~TaskQueue()
 
 void TaskQueue::add(NonnullOwnPtr<Task> task)
 {
-    m_tasks.enqueue(move(task));
+    m_tasks.append(move(task));
     m_event_loop.schedule();
 }
 
+OwnPtr<Task> TaskQueue::take_first_runnable()
+{
+    for (size_t i = 0; i < m_tasks.size(); ++i) {
+        if (m_tasks[i]->is_runnable())
+            return m_tasks.take(i);
+    }
+    return nullptr;
+}
+
 }