From 32ce086ab5fc0f8f006a35d93890a94e016cf0c8 Mon Sep 17 00:00:00 2001
From: JT Smith <jt@plainblack.com>
Date: Wed, 22 Oct 2008 04:00:19 +0000
Subject: [PATCH] Migrated WebGUI::TabForm to use YUI tabs rather than the old
 fashioned    WebGUI tabs.

---
 docs/changelog/7.x.x.txt |  2 ++
 lib/WebGUI/TabForm.pm    | 46 +++++++++++++++++++++++-----------------
 2 files changed, 29 insertions(+), 19 deletions(-)

diff --git a/docs/changelog/7.x.x.txt b/docs/changelog/7.x.x.txt
index 3ec40d5e5..092f610b9 100644
--- a/docs/changelog/7.x.x.txt
+++ b/docs/changelog/7.x.x.txt
@@ -13,6 +13,8 @@
  - rfe: Inclusion of UsersOnline macro into the core  (#766)
  - rfe: Search - Paginate results  (#713)
  - rfe: Leave Version Tag
+ - Migrated WebGUI::TabForm to use YUI tabs rather than the old fashioned
+   WebGUI tabs.
  - WebGUI::Crud can now automatically resolve differences between its
    definition and the table schema.
  - Fixed a limit bug in the asset discovery service.
diff --git a/lib/WebGUI/TabForm.pm b/lib/WebGUI/TabForm.pm
index a0405a18a..ca50a7e1f 100644
--- a/lib/WebGUI/TabForm.pm
+++ b/lib/WebGUI/TabForm.pm
@@ -227,35 +227,43 @@ sub print {
 	my $self = shift;
     my $style = $self->session->style;
     my $url = $self->session->url;
-	$style->setScript($url->extras('tabs/tabs.js'),{type=>"text/javascript"});
-	$style->setLink($self->{_css},{rel=>"stylesheet", rev=>"stylesheet",type=>"text/css"});
+	$style->setLink($self->{_css},{rel=>"stylesheet", rel=>"stylesheet",type=>"text/css"});
+	$style->setLink($url->extras('/yui/build/fonts/fonts-min.css'),{type=>"text/css", rel=>"stylesheet"});
+	$style->setLink($url->extras('/yui/build/tabview/assets/skins/sam/tabview.css'),{type=>"text/css", rel=>"stylesheet"});
     $style->setLink($url->extras('/yui/build/container/assets/container.css'),{ type=>'text/css', rel=>"stylesheet" });
     $style->setLink($url->extras('/hoverhelp.css'),{ type=>'text/css', rel=>"stylesheet" });
-    $style->setScript($url->extras('/yui/build/yahoo/yahoo-min.js'),{ type=>'text/javascript' });
-    $style->setScript($url->extras('/yui/build/dom/dom-min.js'),{ type=>'text/javascript' });
-    $style->setScript($url->extras('/yui/build/event/event-min.js'),{ type=>'text/javascript' });
+    $style->setScript($url->extras('/yui/build/utilities/utilities.js'),{ type=>'text/javascript' });
     $style->setScript($url->extras('/yui/build/container/container-min.js'),{ type=>'text/javascript' });
+    $style->setScript($url->extras('/yui/build/tabview/tabview-min.js'),{ type=>'text/javascript' });
     $style->setScript($url->extras('/hoverhelp.js'),{ type=>'text/javascript' });
 	my $output = $self->{_form};
 	$output .= $self->{_hidden};
 	my $i = 1;
-	my $tabs;
-	my $form;	
+	my $tabs = '<ul class="yui-nav">';
+	my $form = '<div class="yui-content">';
+	my $userUiLevel = $self->session->user->profileField("uiLevel");
+	my $first = 1;
 	foreach my $key (keys %{$self->{_tab}}) {
-		$tabs .= '<span onclick="toggleTab('.$i.')" id="tab'.$i.'" class="tab"';
-                if ($self->{_tab}->{$key}{uiLevel} > $self->session->user->profileField("uiLevel")) {
-                        $tabs .= 'style="display: none;"';
-                }
-                $tabs .= '>'.$self->{_tab}{$key}{label}.'</span> ';
-		$form .= '<div id="tabcontent'.$i.'" class="tabBody"><table><tbody>';
-		$form .= $self->{_tab}{$key}{form}->printRowsOnly;
-		$form .= '</tbody></table></div>';
+		my $hide = '';
+		if ($self->{_tab}->{$key}{uiLevel} > $userUiLevel) {
+			$hide = 'style="display: none;"';
+		}
+		my $selected = '';
+		if ($first && !$hide) {
+			$first = 0;
+			$selected = 'class="selected"';
+		}
+		$tabs .= '<li '.$selected.'><a href="#tab'.$i.'" '.$hide.'><em>'.$self->{_tab}{$key}{label}.'</em></a></li>';
+		$form .= '<div id="tab'.$i.'" '.$hide.'><table>'.$self->{_tab}{$key}{form}->printRowsOnly.'</table></div>';
 		$i++;
 	}
-	$output .= '<div class="tabs">'.$tabs.$self->{_submit}."&nbsp;&nbsp;".$self->{_cancel}.'</div>';
-	$output .= $form;
-	$output .= WebGUI::Form::formFooter($self->session,);
-	$output .= '<script type="text/javascript">var numberOfTabs = '.($i-1).'; initTabs();</script>';
+	$tabs .= '</ul>';
+	$form .= '</div>';
+	$output .= '<div style="float: right;">'.$self->{_submit}.$self->{_cancel}.'</div><div class="yui-skin-sam"><div id="webguiTabForm" class="yui-navset">'.$tabs.$form.'</div></div>';
+	$output .= WebGUI::Form::formFooter($self->session);
+	$output .= q{<script type="text/javascript">
+		var tabView = new YAHOO.widget.TabView('webguiTabForm');
+	</script>};
 	return $output;
 }