X-Git-Url: https://git.madduck.net/etc/zsh.git/blobdiff_plain/e7aef48f33e934106d1a50201d9f098f9886d7ec..57d22c7977ad80556aca28496d0192d4a72ef73a:/.zsh/util

diff --git a/.zsh/util b/.zsh/util
index ce6f9fc..422dba9 100644
--- a/.zsh/util
+++ b/.zsh/util
@@ -2,14 +2,32 @@
 #
 # Miscellaneous utility functions
 #
-# Copyright © 1994–2008 martin f. krafft <madduck@madduck.net>
+# Copyright © 1994–2017 martin f. krafft <madduck@madduck.net>
 # Released under the terms of the Artistic Licence 2.0
 #
-# Source repository: git://git.madduck.net/etc/zsh.git
+# Source repository: http://git.madduck.net/v/etc/zsh.git
 #
 
 is_root() {
   test ${EUID:?} -eq 0
 }
 
+array_prepend() {
+  local arrayname="$1"; shift
+  local i
+  for i; do
+    eval "typeset -ga $arrayname; $arrayname=(\$i \${$arrayname[@]/\$i})"
+  done
+}
+
+array_append() {
+  local arrayname="$1"; shift
+  local i
+  for i; do
+    eval "typeset -ga $arrayname; $arrayname=(\${$arrayname[@]/\$i} \$i)"
+  done
+}
+
+function trace() { ( eval "set -x; $@"; ) }
+
 # vim:ft=zsh