From a1e7e0bc3e2cf040d24580ecfe3f73899b358aa1 Mon Sep 17 00:00:00 2001
From: Alan Pearce
Date: Sun, 20 Aug 2023 06:52:48 +0200
Subject: fish: port functions and more aliases

---
 user/settings/fish/functions/delink.fish  | 10 ++++++++++
 user/settings/fish/functions/ecpenv.fish  |  3 +++
 user/settings/fish/functions/esetenv.fish |  3 +++
 user/settings/fish/functions/field.fish   |  3 +++
 user/settings/fish/functions/help.fish    |  3 +++
 user/settings/fish/functions/tere.fish    |  6 ++++++
 6 files changed, 28 insertions(+)
 create mode 100644 user/settings/fish/functions/delink.fish
 create mode 100644 user/settings/fish/functions/ecpenv.fish
 create mode 100755 user/settings/fish/functions/esetenv.fish
 create mode 100644 user/settings/fish/functions/field.fish
 create mode 100644 user/settings/fish/functions/help.fish
 create mode 100644 user/settings/fish/functions/tere.fish

(limited to 'user/settings/fish/functions')

diff --git a/user/settings/fish/functions/delink.fish b/user/settings/fish/functions/delink.fish
new file mode 100644
index 00000000..ff7ff64b
--- /dev/null
+++ b/user/settings/fish/functions/delink.fish
@@ -0,0 +1,10 @@
+function delink
+    if test ! -L $argv[1]
+        echo "$argv[1] is not a symlink"
+        return 1
+    end
+    set -l src (readlink $argv[1])
+    rm $argv[1]
+    cp $src $argv[1]
+    chmod u+w $argv[1]
+end
diff --git a/user/settings/fish/functions/ecpenv.fish b/user/settings/fish/functions/ecpenv.fish
new file mode 100644
index 00000000..68d6051b
--- /dev/null
+++ b/user/settings/fish/functions/ecpenv.fish
@@ -0,0 +1,3 @@
+function ecpenv
+  esetenv $argv[1] $$argv[1]
+end
diff --git a/user/settings/fish/functions/esetenv.fish b/user/settings/fish/functions/esetenv.fish
new file mode 100755
index 00000000..17357925
--- /dev/null
+++ b/user/settings/fish/functions/esetenv.fish
@@ -0,0 +1,3 @@
+function esetenv
+  emacsclient -e "(setenv \"$argv[1]\" \"$argv[2]\")"
+end
diff --git a/user/settings/fish/functions/field.fish b/user/settings/fish/functions/field.fish
new file mode 100644
index 00000000..96e17bd2
--- /dev/null
+++ b/user/settings/fish/functions/field.fish
@@ -0,0 +1,3 @@
+function field
+    awk "{ print \$$argv[1]}"
+end
diff --git a/user/settings/fish/functions/help.fish b/user/settings/fish/functions/help.fish
new file mode 100644
index 00000000..e649f43e
--- /dev/null
+++ b/user/settings/fish/functions/help.fish
@@ -0,0 +1,3 @@
+function help
+    $argv --help 2>&1 | bat --plan --language=help
+end
diff --git a/user/settings/fish/functions/tere.fish b/user/settings/fish/functions/tere.fish
new file mode 100644
index 00000000..ba5816f9
--- /dev/null
+++ b/user/settings/fish/functions/tere.fish
@@ -0,0 +1,6 @@
+function tere
+    set -f result $(command tere $argv)
+    if test -n $result
+        cd $result
+    end
+end
-- 
cgit 1.4.1