Index: openacs-4/packages/oacs-dav/tcl/test/oacs-dav-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/oacs-dav/tcl/test/oacs-dav-procs.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/oacs-dav/tcl/test/oacs-dav-procs.tcl	16 Feb 2004 16:49:28 -0000	1.1
+++ openacs-4/packages/oacs-dav/tcl/test/oacs-dav-procs.tcl	1 Mar 2005 19:42:44 -0000	1.2
@@ -43,7 +43,7 @@
 	    set item_id ""
 	    oacs_dav::conn -set method "PUT"
 	    oacs_dav::conn -set item_id $item_id
-	    oacs_dav::conn -set url $uri
+	    oacs_dav::conn -set uri $uri
 	    oacs_dav::conn -set urlv $name
 	    oacs_dav::conn -set tmpfile "[acs_root_dir]/packages/oacs-dav/tcl/test/$name"
 	    # we probably want to create a bunch of files in the filesystem
@@ -63,7 +63,7 @@
 	    aa_log "Item_id=$new_item_id"
 	    aa_true "Content Item Created" [expr ![empty_string_p $new_item_id]]
 	    set revision_id [db_string revision_exists "" -default ""]	    
-	    aa_trute "Content Revision Created"  [expr ![empty_string_p $revision_id]]
+	    aa_true "Content Revision Created"  [expr ![empty_string_p $revision_id]]
 	    set cr_filename "[cr_fs_path]/[db_string get_content_filename ""]"
 	    aa_true "Content Attribute Set" [string equal [file size [oacs_dav::conn tmpfile]] [file size $cr_filename]]
 	    
@@ -82,7 +82,7 @@
 	    set name "__test_folder1/__test_folder2"
 	    set uri "/"
             oacs_dav::conn -set item_id ""
-	    oacs_dav::conn -set url $uri
+	    oacs_dav::conn -set uri $uri
 	    oacs_dav::conn -set extra_url $name
 	    oacs_dav::conn -set urlv [split $uri "/"]
 	    oacs_dav::conn -set package_id $package_id
@@ -92,7 +92,7 @@
 	    foreach fname [split $name "/"] {
 		set uri "$uri${fname}/"
                 oacs_dav::conn -set item_name $fname
-		oacs_dav::conn -set url $uri
+		oacs_dav::conn -set uri $uri
 		oacs_dav::conn -set extra_url $fname
 		oacs_dav::conn -set urlv [split $uri "/"]
 		aa_log "name $fname uri $uri"