From a7b2b2d37100450cb6c663025188a7d8c16c4596 Mon Sep 17 00:00:00 2001
From: Gary Holtz <code@garyh.org>
Date: Wed, 5 Dec 2012 15:27:14 -0600
Subject: [PATCH] Adding Path Finder alternatives for the pfd and pfs commands
 in the OSX plugin.

'ppfd' and 'ppfs' should work the same way as 'pfd' and 'pfs', but with
Path Finder-y goodness!
---
 plugins/osx/osx.plugin.zsh | 34 ++++++++++++++++++++++++++++++++++
 1 file changed, 34 insertions(+)

diff --git a/plugins/osx/osx.plugin.zsh b/plugins/osx/osx.plugin.zsh
index 682bb2667..7ffef3d96 100644
--- a/plugins/osx/osx.plugin.zsh
+++ b/plugins/osx/osx.plugin.zsh
@@ -64,6 +64,40 @@ function pfs() {
 EOF
 }
 
+function ppfd() {
+  osascript 2>/dev/null <<EOF
+    tell application "Path Finder"
+      set the window_list to the finder windows
+      set front_window to item 1 of window_list
+      set front_path to the POSIX path of the target of the front finder window
+      return front_path
+    end tell
+EOF
+}
+
+function ppfs() {
+  osascript 2>/dev/null <<EOF
+  set output to ""
+  tell application "Path Finder"
+    set pf_selection to selection
+    if pf_selection is missing value then
+      return
+    end if
+    set item_count to count pf_selection
+    repeat with i from 1 to count pf_selection
+      set pf_item to item i of pf_selection
+      try
+        set current_path to (POSIX path of pf_item)
+        if i is less than item_count - 1 then set the_delimter to "
+  "
+        if i is item_count then set the_delimiter to ""
+        set output to output & current_path & the_delimter
+      end try
+    end repeat
+  end tell
+EOF
+}
+
 function cdf() {
   cd "$(pfd)"
 }