Index: openacs-4/packages/acs-templating/acs-templating.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/acs-templating.info,v
diff -u -r1.11.2.4 -r1.11.2.5
--- openacs-4/packages/acs-templating/acs-templating.info 5 May 2003 09:28:04 -0000 1.11.2.4
+++ openacs-4/packages/acs-templating/acs-templating.info 6 Jun 2003 08:58:45 -0000 1.11.2.5
@@ -7,7 +7,7 @@
t
t
-
+
Karl Goldstein
@@ -19,13 +19,14 @@
template system provides a way to use a single layout
specification for many physical pages, so the overall layout of a site can be more easily administered.
-
+
-
+
+
Index: openacs-4/packages/acs-templating/resources/forms/standard-lars.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/resources/forms/Attic/standard-lars.adp,v
diff -u -r1.5.2.4 -r1.5.2.5
--- openacs-4/packages/acs-templating/resources/forms/standard-lars.adp 5 Jun 2003 13:23:44 -0000 1.5.2.4
+++ openacs-4/packages/acs-templating/resources/forms/standard-lars.adp 6 Jun 2003 08:59:01 -0000 1.5.2.5
@@ -46,7 +46,9 @@
@elements.label@
- *
+
+ *
+
Index: openacs-4/packages/acs-templating/tcl/0-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/Attic/0-procs.tcl,v
diff -u -r1.7.2.1 -r1.7.2.2
--- openacs-4/packages/acs-templating/tcl/0-procs.tcl 5 Mar 2003 14:57:37 -0000 1.7.2.1
+++ openacs-4/packages/acs-templating/tcl/0-procs.tcl 6 Jun 2003 08:58:29 -0000 1.7.2.2
@@ -53,7 +53,7 @@
# default settings
variable defaults
- set defaults [list method post section {} mode edit edit_buttons { { "OK" ok } } display_buttons { { "Edit" edit } }]
+ set defaults [list method post section {} mode edit edit_buttons { { "OK" ok } } display_buttons { { "Edit" edit } } show_required_p t]
}
namespace eval wizard {
Index: openacs-4/packages/acs-templating/tcl/form-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/form-procs.tcl,v
diff -u -r1.7.2.5 -r1.7.2.6
--- openacs-4/packages/acs-templating/tcl/form-procs.tcl 10 May 2003 16:08:15 -0000 1.7.2.5
+++ openacs-4/packages/acs-templating/tcl/form-procs.tcl 6 Jun 2003 08:58:29 -0000 1.7.2.6
@@ -103,6 +103,9 @@
@option elements A block of element specifications.
+ @option show_required_p Should the form template show which elements are required.
+ Use 1 or t for true, 0 or f for false. Defaults to true.
+
@see template::form::get_button
@see template::form::get_action
@@ -343,9 +346,12 @@
if { [string equal $style {}] } {
set style [parameter::get \
- -package_id [apm_package_id_from_key "acs-templating"] \
+ -package_id [ad_conn subsite_id] \
-parameter DefaultFormStyle \
- -default "standard"]
+ -default [parameter::get \
+ -package_id [apm_package_id_from_key "acs-templating"] \
+ -parameter DefaultFormStyle \
+ -default "standard-lars"]]
}
set file_stub [template::get_resource_path]/forms/$style