Index: openacs-4/packages/acs-admin/www/apm/parameter-add-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/parameter-add-2.tcl,v
diff -u -r1.6 -r1.6.12.1
--- openacs-4/packages/acs-admin/www/apm/parameter-add-2.tcl 17 Sep 2003 18:35:47 -0000 1.6
+++ openacs-4/packages/acs-admin/www/apm/parameter-add-2.tcl 24 May 2007 12:16:27 -0000 1.6.12.1
@@ -17,7 +17,7 @@
{max_n_values:integer 1}
} -validate {
datatype_type_ck {
- if {$datatype != "number" && $datatype != "string"} {
+ if {$datatype != "number" && $datatype != "string" && $datatype != "text"} {
ad_complain
}
}
@@ -32,7 +32,7 @@
}
}
} -errors {
- datatype_type_ck {The datatype must be either a number or a string.}
+ datatype_type_ck {The datatype must be either a number or a string or text.}
}
db_transaction {
Index: openacs-4/packages/acs-admin/www/apm/parameter-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/parameter-add.tcl,v
diff -u -r1.5 -r1.5.12.1
--- openacs-4/packages/acs-admin/www/apm/parameter-add.tcl 11 Nov 2003 10:29:07 -0000 1.5
+++ openacs-4/packages/acs-admin/www/apm/parameter-add.tcl 24 May 2007 12:16:27 -0000 1.5.12.1
@@ -72,7 +72,7 @@
Type: |
|
Index: openacs-4/packages/acs-admin/www/apm/parameter-edit-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/parameter-edit-2.tcl,v
diff -u -r1.4 -r1.4.12.1
--- openacs-4/packages/acs-admin/www/apm/parameter-edit-2.tcl 17 Sep 2003 18:35:47 -0000 1.4
+++ openacs-4/packages/acs-admin/www/apm/parameter-edit-2.tcl 24 May 2007 12:16:27 -0000 1.4.12.1
@@ -17,12 +17,12 @@
{max_n_values:integer 1}
} -validate {
datatype_type_ck {
- if {$datatype != "number" && $datatype != "string"} {
+ if {$datatype != "number" && $datatype != "string" && $datatype != "text"} {
ad_complain
}
}
} -errors {
- datatype_type_ck {The datatype must be either a number or a string.}
+ datatype_type_ck {The datatype must be either a number or a string or text.}
}
db_transaction {
Index: openacs-4/packages/acs-admin/www/apm/parameter-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/parameter-edit.tcl,v
diff -u -r1.5 -r1.5.6.1
--- openacs-4/packages/acs-admin/www/apm/parameter-edit.tcl 1 Mar 2005 00:01:21 -0000 1.5
+++ openacs-4/packages/acs-admin/www/apm/parameter-edit.tcl 24 May 2007 12:16:27 -0000 1.5.6.1
@@ -80,7 +80,7 @@
Type: |
|
Index: openacs-4/packages/acs-kernel/sql/oracle/apm-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/sql/oracle/apm-create.sql,v
diff -u -r1.38 -r1.38.2.1
--- openacs-4/packages/acs-kernel/sql/oracle/apm-create.sql 26 Sep 2006 14:48:02 -0000 1.38
+++ openacs-4/packages/acs-kernel/sql/oracle/apm-create.sql 24 May 2007 12:16:27 -0000 1.38.2.1
@@ -547,7 +547,7 @@
datatype varchar2(100)
constraint apm_parameters_datatype_nn not null
constraint apm_parameters_datatype_ck
- check(datatype in ('number', 'string')),
+ check(datatype in ('number', 'string','text')),
default_value varchar2(4000),
min_n_values integer default 1
constraint apm_parameters_min_n_values_nn not null
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/acs-kernel/sql/oracle/upgrade/upgrade-5.3.2d1-5.3.2d2.sql'.
Fisheye: No comparison available. Pass `N' to diff?
Index: openacs-4/packages/acs-kernel/sql/postgresql/apm-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/sql/postgresql/apm-create.sql,v
diff -u -r1.66 -r1.66.2.1
--- openacs-4/packages/acs-kernel/sql/postgresql/apm-create.sql 25 Sep 2006 17:59:16 -0000 1.66
+++ openacs-4/packages/acs-kernel/sql/postgresql/apm-create.sql 24 May 2007 12:16:27 -0000 1.66.2.1
@@ -684,7 +684,7 @@
section_name varchar(200),
datatype varchar(100) not null
constraint apm_parameters_datatype_ck
- check(datatype in ('number', 'string')),
+ check(datatype in ('number', 'string','text')),
default_value text,
min_n_values integer default 1 not null
constraint apm_parameters_min_n_values_ck
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/acs-kernel/sql/postgresql/upgrade/upgrade-5.3.2d1-5.3.2d2.sql'.
Fisheye: No comparison available. Pass `N' to diff?
Index: openacs-4/packages/acs-subsite/www/shared/parameters.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/shared/parameters.tcl,v
diff -u -r1.11.2.1 -r1.11.2.2
--- openacs-4/packages/acs-subsite/www/shared/parameters.tcl 3 Mar 2007 14:00:03 -0000 1.11.2.1
+++ openacs-4/packages/acs-subsite/www/shared/parameters.tcl 24 May 2007 12:16:26 -0000 1.11.2.2
@@ -70,10 +70,20 @@
set focus_elm $parameter_name
}
- set elm [list ${parameter_name}:text,optional,nospell \
+ switch $datatype {
+ text {
+ set widget textarea
+ set html [list cols 100 rows 15]
+ }
+ default {
+ set widget text
+ set html [list size 50]
+ }
+ }
+ set elm [list ${parameter_name}:text($widget),optional,nospell \
{label {$parameter_name}} \
{help_text {$description}} \
- {html {size 50}}]
+ [list html $html]]
set file_val [ad_parameter_from_file $parameter_name $package_key]
if { ![empty_string_p $file_val] } {