From 86d9fc6860104efcfee5e6c7c40591c1cc241c5f Mon Sep 17 00:00:00 2001
From: Graham Knop <graham@plainblack.com>
Date: Tue, 24 Jul 2007 22:32:05 +0000
Subject: [PATCH] fix: javascript errors in SQL Form date inputs in IE

---
 docs/changelog/7.x.x.txt            | 1 +
 lib/WebGUI/Asset/Wobject/SQLForm.pm | 4 +++-
 2 files changed, 4 insertions(+), 1 deletion(-)

diff --git a/docs/changelog/7.x.x.txt b/docs/changelog/7.x.x.txt
index 22b7825ae..7b57260f0 100644
--- a/docs/changelog/7.x.x.txt
+++ b/docs/changelog/7.x.x.txt
@@ -88,6 +88,7 @@
  - Allow editing previous revisions of assets in the current version tag
  - Add user to transactions list and pending transactions.
  - fix: autolinking in wiki pages with manual links didn't work properly
+ - fix: javascript errors in SQL Form date inputs in IE
 
 7.3.21
  - fix: Self-deactivation doesn't show login screen after success
diff --git a/lib/WebGUI/Asset/Wobject/SQLForm.pm b/lib/WebGUI/Asset/Wobject/SQLForm.pm
index 049a4c822..755acb149 100644
--- a/lib/WebGUI/Asset/Wobject/SQLForm.pm
+++ b/lib/WebGUI/Asset/Wobject/SQLForm.pm
@@ -2442,7 +2442,9 @@ sub _getFormElement {
 		$fieldParameters->{$field->{widthParam}}	= $field->{formFieldWidth} if ($field->{formFieldWidth});
 		$fieldParameters->{$field->{heightParam}}	= $field->{formFieldHeight} if ($field->{formFieldHeight});
 		$fieldParameters->{maxlength}			= $maxLength;
-		$fieldParameters->{extras}			= 'onkeyup="if (this.value.length > '.$maxLength.') {this.value = this.value.substring(0,'.$maxLength.');}"';
+		if ($fieldType eq 'textarea') {
+    		$fieldParameters->{extras}			= 'onkeyup="if (this.value.length > '.$maxLength.') {this.value = this.value.substring(0,'.$maxLength.');}"';
+		}
 		$fieldParameters->{id}				= 'sqlform'.$field->{fieldId};
 
 		# Show file if a file is uploaded