Index: openacs-4/packages/acs-admin/www/test/security-test.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/test/security-test.tcl,v
diff -u -N
--- openacs-4/packages/acs-admin/www/test/security-test.tcl 7 Aug 2017 23:47:45 -0000 1.3
+++ /dev/null 1 Jan 1970 00:00:00 -0000
@@ -1,26 +0,0 @@
-ReturnHeaders
-
-ns_write "[ad_header "Security API test"]
-
-"
-
-ad_set_client_property test MyName MyValue
-
-ns_write "- Set client property..."
-
-set result [ad_get_client_property test MyName]
-
-if { $result eq "MyValue" } {
- ns_write "
- Success: Client property successfully retrieved..."
-} else {
- ns_write "
- Failure: Client property was incorrectly retrieved, expected MyValue, instead got $result..."
-}
-
-ns_write "
-
-[ad_footer]"
-# Local variables:
-# mode: tcl
-# tcl-indent-level: 4
-# indent-tabs-mode: nil
-# End: