Index: openacs-4/packages/imsld/www/imsld-content-serve.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/imsld-content-serve.tcl,v
diff -u -r1.13 -r1.14
--- openacs-4/packages/imsld/www/imsld-content-serve.tcl	10 Oct 2006 10:57:20 -0000	1.13
+++ openacs-4/packages/imsld/www/imsld-content-serve.tcl	16 Oct 2006 16:32:52 -0000	1.14
@@ -298,9 +298,10 @@
     # prepare replacement
     set form_node [$dom_doc createElement "form"]
     $form_node setAttribute name "set-properties"
-    $form_node setAttribute action "properties-value-set"
+    set url_prefix [ns_conn url]
+    regexp (.*)/ $url_prefix url_prefix
+    $form_node setAttribute action "${url_prefix}/properties-value-set"
     $form_node setAttribute method "get"
-
     if { [string eq $view "title-value"] } {
         $form_node appendChild [$dom_doc createTextNode "$title"] 
     }
@@ -351,7 +352,9 @@
     # prepare replacement
     set form_node [$dom_doc createElement "form"]
     $form_node setAttribute name "set-properties"
-    $form_node setAttribute action "properties-value-set"
+    set url_prefix [ns_conn url]
+    regexp (.*)/ $url_prefix url_prefix
+    $form_node setAttribute action "${url_prefix}/properties-value-set"
     $form_node setAttribute method "get"
 
     # add group title (according to the spec)