From cab4384bdb27f01a340323312cbcd8129d8d0569 Mon Sep 17 00:00:00 2001
From: Peter Palfrader <peter@palfrader.org>
Date: Sat, 27 Jun 2009 10:33:51 +0000
Subject: Add vcs-info

git-svn-id: svn+ssh://asteria.noreply.org/svn/weaselutils/trunk@398 bc3d92e2-beff-0310-a7cd-cc87d7ac0ede
---
 zshfunc/vcs-info/VCS_INFO_tla_get_data | 9 +++++++++
 1 file changed, 9 insertions(+)
 create mode 100644 zshfunc/vcs-info/VCS_INFO_tla_get_data

(limited to 'zshfunc/vcs-info/VCS_INFO_tla_get_data')

diff --git a/zshfunc/vcs-info/VCS_INFO_tla_get_data b/zshfunc/vcs-info/VCS_INFO_tla_get_data
new file mode 100644
index 0000000..130ac77
--- /dev/null
+++ b/zshfunc/vcs-info/VCS_INFO_tla_get_data
@@ -0,0 +1,9 @@
+VCS_INFO_tla_get_data () { # {{{
+    local tlabase tlabranch
+
+    tlabase="$(VCS_INFO_realpath ${vcs_comm[basedir]})"
+    # tree-id gives us something like 'foo@example.com/demo--1.0--patch-4', so:
+    tlabranch=${${"$( tla tree-id )"}/*\//}
+    VCS_INFO_formats '' "${tlabranch}" "${tlabase}"
+    return 0
+}
-- 
cgit v1.2.3