Index: openacs-4/packages/ecommerce/tcl/ec-style-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/tcl/Attic/ec-style-procs.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/ecommerce/tcl/ec-style-procs.tcl	18 Jul 2001 18:19:01 -0000	1.2
+++ openacs-4/packages/ecommerce/tcl/ec-style-procs.tcl	31 Jan 2002 06:41:59 -0000	1.3
@@ -17,14 +17,15 @@
     given in the AOLserver Tcl API docs for ns_register_adptag)
 
 } {
-    ns_share ec_styletag
-    ns_share ec_styletag_source_file
     set generated_proc_name "ec_style_$tagname"
     ad_proc $generated_proc_name  {{string ""} {tagset ""}} "Proc generated by ec_register_styletag to support the $tagname ADP tag." $proc_body
+
     # let's register the ADP tag now
     ns_register_adptag $tagname "/$tagname" $generated_proc_name
-    set ec_styletag($tagname) $tag_documentation
-    set ec_styletag_source_file($tagname) [info script]
+
+    # Store the tag and the script for later reference by doc/styles and doc/style-one
+    nsv_set ec_styletag $tagname $tag_documentation
+    nsv_set ec_styletag_source_file $tagname  [info script]
 }
 
 ad_proc ec_style_template_root_internal {} { returns template root } {