Index: openacs-4/etc/install/dotlrn-links-check.test =================================================================== RCS file: /usr/local/cvsroot/openacs-4/etc/install/Attic/dotlrn-links-check.test,v diff -u -N -r1.1 -r1.2 --- openacs-4/etc/install/dotlrn-links-check.test 4 Sep 2003 16:51:26 -0000 1.1 +++ openacs-4/etc/install/dotlrn-links-check.test 23 Oct 2003 12:35:21 -0000 1.2 @@ -7,22 +7,22 @@ # Login the site wide admin login_site_wide_admin - puts "crawling links starting from /dotlrn" + ::twt::log "crawling links starting from /dotlrn" lappend __url_history "${server_url}/dotlrn" crawl_links - puts "crawling links starting from /dotlrn/admin" + ::twt::log "crawling links starting from /dotlrn/admin" lappend __url_history "${server_url}/dotlrn/admin" crawl_links # Test Execution END } result] } { global errorInfo - puts stderr $result - puts stderr "*** Tcl TRACE ***" - puts stderr $errorInfo + ::twt::log stderr $result + ::twt::log stderr "*** Tcl TRACE ***" + ::twt::log stderr $errorInfo - puts "The response body is: [response body]" + ::twt::log "The response body is: [response body]" error "Test failed: $result" }