oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

more asset manager changes

Browse source
This commit is contained in:
JT Smith 2004-12-21 04:33:26 +00:00
parent 9d5353cf8f
commit 95bac10986
15 changed files with 247 additions and 99 deletions
Download patch file Download diff file Expand all files Collapse all files

9
lib/WebGUI/TabForm.pm
View file

@ -20,6 +20,7 @@ use Tie::IxHash;
use WebGUI::Form;
use WebGUI::HTMLForm;
use WebGUI::Session;
use WebGUI::Style;
=head1 NAME
@ -214,11 +215,9 @@ Returns an HTML string with all the necessary components to draw the tab form.
sub print {
my $self = shift;
my $output = '
<script src="'.$session{config}{extrasURL}.'/tabs/tabs.js" type="text/javascript"></script>
<link href="'.$self->{_css}.'" rel="stylesheet" rev="stylesheet" type="text/css">
';
$output .= $self->{_form};
WebGUI::Style::setScript($session{config}{extrasURL}.'/tabs/tabs.js',{type=>"text/javascript"});
WebGUI::Style::setLink($self->{_css},{rel=>"stylesheet", rev=>"stylesheet",type=>"text/css"});
my $output = $self->{_form};
$output .= $self->{_hidden};
my $i = 1;
my $tabs;