From e896f3cb1ed21866ca81ab990cf6424cf89536cc Mon Sep 17 00:00:00 2001
From: JT Smith <jt@plainblack.com>
Date: Sun, 11 Jul 2004 16:10:51 +0000
Subject: [PATCH] added some stuff to credits and updated DataForm to use new
 script/css methods

---
 docs/credits.txt               | 5 +++++
 lib/WebGUI/Wobject/DataForm.pm | 5 +++--
 2 files changed, 8 insertions(+), 2 deletions(-)

diff --git a/docs/credits.txt b/docs/credits.txt
index a67fce453..5cfb61c08 100644
--- a/docs/credits.txt
+++ b/docs/credits.txt
@@ -52,6 +52,10 @@ Convert::ASN1........................Graham Barr
 
 Data::Config.........................Sébastien Aperghis-Tramoni
 
+DBIx::FullTextSearch.................T.J. Mather
+
+DBIx::Tree::NestedSet................Dan Collis Puro
+
 HTML::TagFilter......................William Ross
 
 HTML::Template.......................Sam Tregar
@@ -88,3 +92,4 @@ Cool Menus...........................Thomas Brattli
 
 dTree................................Geir Landro
 				     http://www.destroydrop.com
+
diff --git a/lib/WebGUI/Wobject/DataForm.pm b/lib/WebGUI/Wobject/DataForm.pm
index 8d058243f..409f30e29 100644
--- a/lib/WebGUI/Wobject/DataForm.pm
+++ b/lib/WebGUI/Wobject/DataForm.pm
@@ -25,6 +25,7 @@ use WebGUI::MessageLog;
 use WebGUI::Privilege;
 use WebGUI::Session;
 use WebGUI::SQL;
+use WebGUI::Style;
 use WebGUI::TabForm;
 use WebGUI::URL;
 use WebGUI::Wobject;
@@ -897,8 +898,8 @@ sub www_view {
 		return $_[0]->processTemplate($_[0]->get("listTemplateId"),$_[0]->getListTemplateVars,"DataForm/List");
 	}
 	# add Tab StyleSheet and JavaScript
-	$session{page}{head}{link}{'/extras/tabs/tabs.css'}{type} = 'text/css';
-	$session{page}{head}{javascript}{'/extras/tabs/tabs.js'}{language} = 'JavaScript';
+	WebGUI::Style::setLink('/extras/tabs/tabs.css', {"type"=>"text/css"});
+	WebGUI::Style::setScript('/extras/tabs/tabs.js', {"language"=>"JavaScript"});
 	$var = $_[1] || $_[0]->getRecordTemplateVars($var);
 	return $_[0]->processTemplate($_[0]->get("templateId"),$var);
 }