Index: openacs-4/packages/dotlrn/www/dotlrn-master.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/dotlrn-master.adp,v
diff -u -r1.10.2.2 -r1.10.2.3
--- openacs-4/packages/dotlrn/www/dotlrn-master.adp 18 Oct 2002 21:25:32 -0000 1.10.2.2
+++ openacs-4/packages/dotlrn/www/dotlrn-master.adp 29 Nov 2002 15:10:46 -0000 1.10.2.3
@@ -35,7 +35,7 @@
-
+ @attribute.key@="@attribute.value@">
Index: openacs-4/packages/dotlrn/www/dotlrn-master.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/dotlrn-master.tcl,v
diff -u -r1.9.2.3 -r1.9.2.4
--- openacs-4/packages/dotlrn/www/dotlrn-master.tcl 24 Oct 2002 13:14:47 -0000 1.9.2.3
+++ openacs-4/packages/dotlrn/www/dotlrn-master.tcl 29 Nov 2002 15:10:46 -0000 1.9.2.4
@@ -545,6 +545,17 @@
"
+# Focus
+multirow create attribute key value
+
+if { ![template::util::is_nil focus] } {
+ # Handle elements wohse name contains a dot
+ regexp {^([^.]*)\.(.*)$} $focus match form_name element_name
+
+ template::multirow append \
+ attribute onload "javascript:document.forms\['${form_name}'\].elements\['${element_name}'\].focus()"
+}
+
# Developer-support support
set ds_enabled_p [parameter::get_from_package_key \
-package_key acs-developer-support \