1 files changed, 0 insertions, 32 deletions
diff --git a/pddp/pddpboot.tcl b/pddp/pddpboot.tcl
deleted file mode 100755
index 3cec684..0000000
--- a/pddp/pddpboot.tcl
+++ /dev/null
@@ -1,32 +0,0 @@
-#!/bin/sh
-# \
-exec tclsh "$0" -- "$@"
-
-# Synopsis
-#   test run:
-#     ./pddpboot.tcl [root [port [path]]]
-#   from Pd:
-#     source pddpboot.tcl
-#     ::pddp::srvUse root (or ::pddp::srvStart root [port])
-#     ::pddp::cliOpen path
-#     ... (more "::pddp::cliOpen" calls) ...
-#     ::pddp::srvStop
-
-if {[namespace exists ::pddp]} {  ;# created by pddplink's setup
-    puts stderr "Booting pddp"
-    set ::pddp::testrun 0
-} else {
-    puts stderr "Booting pddp, test run..."
-    namespace eval ::pddp { variable testrun 1 }
-}
-
-puts stderr "current directory: [pwd]"
-
-source pddpclient.tcl
-source pddpserver.tcl
-
-if {[info exists ::pddp::theDir]} {
-    puts stderr "restoring directory: $::pddp::theDir"
-    cd $::pddp::theDir
-    unset ::pddp::theDir
-}