From 5a5d5eb85b245e0c6bc561134fdb0fd0bf9bbe10 Mon Sep 17 00:00:00 2001
From: Michal Szymanski <55950820+misiektoja@users.noreply.github.com>
Date: Tue, 11 Jun 2024 01:25:53 +0200
Subject: [PATCH] feat(forklift): add support for ForkLift 4 (#12490) (#12491)

---
 plugins/forklift/forklift.plugin.zsh | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/plugins/forklift/forklift.plugin.zsh b/plugins/forklift/forklift.plugin.zsh
index 848aedabf..4bc74958d 100644
--- a/plugins/forklift/forklift.plugin.zsh
+++ b/plugins/forklift/forklift.plugin.zsh
@@ -2,6 +2,7 @@
 # Author: Adam Strzelecki nanoant.com, modified by Bodo Tasche bitboxer.de
 #         Updated to support ForkLift 2 and ForkLift 3 by Johan Kaving
 #         Updated to support ForkLift from Setapp by Paul Rudkin
+#         Updated to support ForkLift 4 by Michal Szymanski (misiektoja)
 #
 # Usage:
 #   fl [<folder>]
@@ -110,6 +111,11 @@ function fl {
             tell pop over of list of group of splitter group of splitter group of topWindow
                 set value of text field 1 to "$PWD"
             end tell
+        else if forkLiftVersion starts with "4" then
+            tell pop over of list of group of splitter group of splitter group of topWindow
+                keystroke "$PWD"
+                delay 0.1
+            end tell
         else
             tell sheet 1 of topWindow
                 set value of text field 1 to "$PWD"