From 5aa8bab22ffca13325a288f1b8a174ef7880cdcf Mon Sep 17 00:00:00 2001
From: Aaron Dodson <gonfunko@gmail.com>
Date: Wed, 30 Jun 2021 17:40:00 +0000
Subject: [PATCH] Work around WebKit bug that prevents scrolling/zooming the
 workspace.

---
 core/workspace_svg.js | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/core/workspace_svg.js b/core/workspace_svg.js
index 95618dbef..3ec92848e 100644
--- a/core/workspace_svg.js
+++ b/core/workspace_svg.js
@@ -877,6 +877,10 @@ Blockly.WorkspaceSvg.prototype.createDom = function(opt_backgroundClass) {
   if (!this.isFlyout) {
     Blockly.browserEvents.conditionalBind(
         this.svgGroup_, 'mousedown', this, this.onMouseDown_, false, true);
+    // This no-op works around https://bugs.webkit.org/show_bug.cgi?id=226683,
+    // which otherwise prevents zoom/scroll events from being observed in
+    // Safari. Once that bug is fixed it should be removed.
+    document.body.addEventListener('wheel', function(e) {});
     Blockly.browserEvents.conditionalBind(
         this.svgGroup_, 'wheel', this, this.onMouseWheel_);
   }