Index: openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl,v
diff -u -N -r1.2 -r1.3
--- openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl	16 Apr 2001 04:46:21 -0000	1.2
+++ openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl	18 Apr 2001 15:28:19 -0000	1.3
@@ -30,14 +30,6 @@
     error "$path is not under the path root ([acs_root_dir])"
 }
 
-# A "safe" way to source a Tcl file. This is mainly so we can trace sourcing in the call stack,
-# which is fairly important in the QD, and generally a better idea for figuring out what the
-# heck is going on. (ben)
-proc acs_source { path } {
-    # That's right, that's all we're doing. Wrapping source so we can do call stack traces.
-    source $path
-}
-
 proc ad_parse_documentation_string { doc_string elements_var } {
     upvar $elements_var elements
     if { [info exists elements] } {