1 files changed, 40 insertions, 0 deletions
diff --git a/tcllib/support/shed.tcl b/tcllib/support/shed.tcl
new file mode 100644
index 0000000..17d3f6c
--- /dev/null
+++ b/tcllib/support/shed.tcl
@@ -0,0 +1,40 @@
+###
+# Build basic description of this tool
+###
+
+###
+# List of mirrors
+###
+#tool mirror http://core.tcl.tk/tcllib 
+#tool mirror http://fossil.etoyoc.com/fossil/tcllib
+###
+# Populate the branches
+###
+my shed set name: tcllib
+my shed set installer: sak
+my add {
+  name: trunk
+  linktype: release
+  checkout: trunk
+}
+foreach release {
+  1.17 1.16 1.15 1.14 1.13 1.12 1.11.1 1.11 1.10
+  1.9 1.8 1.7 1.6.1 1.4 1.3 1.2.0 1.2 1.1 1.0
+  0.8 0.6.1 0.6 0.5 0.4
+} {
+  set checkout tcllib-[join [split $release .] -]
+  my add [list name: $checkout linktype: release version: $release checkout: $checkout]
+}
+
+foreach file [glob [file join $::TOOL_ROOT apps *]] {
+  if {[file extension $file] ne {}} continue
+  my scan $file {class: application}
+}
+
+###
+# Build the module section
+###
+foreach path [glob [file join $::TOOL_ROOT modules *]] {
+  puts "SCANNING $path"
+  my scan $path {class: source}
+}