fixed the context sensitive help links

This commit is contained in:
JT Smith 2004-07-05 21:51:39 +00:00
parent 3375889a61
commit fbd0fa7efa
33 changed files with 77 additions and 107 deletions

View file

@ -101,7 +101,7 @@ sub www_edit {
-properties=>$properties->printRowsOnly,
-layout=>$layout->printRowsOnly,
-headingId=>12,
-helpId=>1
-helpId=>"article add/edit"
);
}

View file

@ -536,7 +536,7 @@ sub www_edit {
return $_[0]->SUPER::www_edit(
-properties=>$properties->printRowsOnly,
-layout=>$layout->printRowsOnly,
-helpId=>1,
-helpId=>"data form add/edit",
-headingId=>7
);
}
@ -619,7 +619,7 @@ sub www_editField {
%field = WebGUI::SQL->quickHash("select * from DataForm_field where DataForm_fieldId=$session{form}{fid}");
}
$tab = WebGUI::SQL->buildHashRef("select DataForm_tabId,label from DataForm_tab where wobjectId=".$_[0]->get("wobjectId"));
$output = helpIcon(2,$_[0]->get("namespace"));
$output = helpIcon("data form fields add/edit",$_[0]->get("namespace"));
$output .= '<h1>'.WebGUI::International::get(20,$_[0]->get("namespace")).'</h1>';
$f = WebGUI::HTMLForm->new;
$f->hidden("wid",$_[0]->get("wobjectId"));
@ -734,7 +734,7 @@ sub www_editTab {
unless ($session{form}{tid} eq "new") {
%tab = WebGUI::SQL->quickHash("select * from DataForm_tab where DataForm_tabId=$session{form}{tid}");
}
$output = helpIcon(2,$_[0]->get("namespace"));
$output = helpIcon("data form fields add/edit",$_[0]->get("namespace"));
$output .= '<h1>'.WebGUI::International::get(20,$_[0]->get("namespace")).'</h1>';
$f = WebGUI::HTMLForm->new;
$f->hidden("wid",$_[0]->get("wobjectId"));

View file

@ -223,7 +223,7 @@ sub www_edit {
return $_[0]->SUPER::www_edit(
-properties=>$properties->printRowsOnly,
-layout=>$layout->printRowsOnly,
-helpId=>1,
-helpId=>"events calendar add/edit",
-headingId=>12
);
}
@ -268,7 +268,7 @@ sub www_editEvent {
$f->hidden("until");
$special = $f->printRowsOnly;
}
$output = helpIcon(2,$_[0]->get("namespace"));
$output = helpIcon("event add/edit",$_[0]->get("namespace"));
$output .= '<h1>'.WebGUI::International::get(13,$_[0]->get("namespace")).'</h1>';
$f = WebGUI::HTMLForm->new;
$f->hidden("wid",$_[0]->get("wobjectId"));

View file

@ -205,7 +205,7 @@ sub www_edit {
-properties=>$properties->printRowsOnly,
-layout=>$layout->printRowsOnly,
-headingId=>9,
-helpId=>1
-helpId=>"file manager add/edit"
);
}
@ -227,7 +227,7 @@ sub www_editDownload {
$session{page}{useAdminStyle} = 1;
my ($output, $file, $f);
$file = $_[0]->getCollateral("FileManager_file","FileManager_fileId",$session{form}{did});
$output .= helpIcon(2,$_[0]->get("namespace"));
$output .= helpIcon("file add/edit",$_[0]->get("namespace"));
$output .= '<h1>'.WebGUI::International::get(10,$_[0]->get("namespace")).'</h1>';
$f = WebGUI::HTMLForm->new;
$f->hidden("wid",$_[0]->get("wobjectId"));

View file

@ -136,7 +136,7 @@ sub www_edit {
-properties=>$properties->printRowsOnly,
-layout=>$layout->printRowsOnly,
-privileges=>$privileges->printRowsOnly,
-helpId=>1,
-helpId=>"http proxy add/edit",
-headingId=>2
);
}

View file

@ -1,5 +1,4 @@
package WebGUI::Wobject::IndexedSearch;
$VERSION = "1.4";
#Test to see if Time::HiRes will load.
my $hasTimeHiRes=1;
@ -214,7 +213,7 @@ sub www_edit {
-layout=>$layout->printRowsOnly,
-privileges=>$privileges->printRowsOnly,
-heading=>"Edit Search",
-helpId=>1
-helpId=>"search add/edit"
);
}

View file

@ -160,7 +160,7 @@ sub www_edit {
return $_[0]->SUPER::www_edit(
-properties=>$properties->printRowsOnly,
-headingId=>6,
-helpId=>1
-helpId=>"message board add/edit"
);
}
@ -194,7 +194,7 @@ sub www_editForum {
);
$f->raw(WebGUI::Forum::UI::forumProperties($forum->get("forumId")));
$f->submit;
return helpIcon(3,$_[0]->get("namespace")).'<h1>'.WebGUI::International::get(77,$_[0]->get("namespace")).'</h1>'.$f->print;
return helpIcon("forum add/edit",$_[0]->get("namespace")).'<h1>'.WebGUI::International::get(77,$_[0]->get("namespace")).'</h1>'.$f->print;
}
#-------------------------------------------------------------------

View file

@ -202,7 +202,7 @@ sub www_edit {
-properties=>$properties->printRowsOnly,
-privileges=>$privileges->printRowsOnly,
-headingId=>9,
-helpId=>1
-helpId=>"poll add/edit"
);
if ($_[0]->get("wobjectId") ne "new") {
$output .= '<p>';

View file

@ -166,7 +166,7 @@ sub www_addAccessory {
return WebGUI::Privilege::insufficient() unless ($_[0]->canEdit);
$session{page}{useAdminStyle} = 1;
my ($output, $f, $accessory, @usedAccessories);
$output = helpIcon(4,$_[0]->get("namespace"));
$output = helpIcon("product accessory add/edit",$_[0]->get("namespace"));
$output .= '<h1>'.WebGUI::International::get(16,$_[0]->get("namespace")).'</h1>';
$f = WebGUI::HTMLForm->new;
$f->hidden("wid",$_[0]->get("wobjectId"));
@ -203,7 +203,7 @@ sub www_addAccessorySave {
sub www_addRelated {
return WebGUI::Privilege::insufficient() unless ($_[0]->canEdit);
my ($output, $f, $related, @usedRelated);
$output = helpIcon(5,$_[0]->get("namespace"));
$output = helpIcon("product related add/edit",$_[0]->get("namespace"));
$output .= '<h1>'.WebGUI::International::get(19,$_[0]->get("namespace")).'</h1>';
$f = WebGUI::HTMLForm->new;
$f->hidden("wid",$_[0]->get("wobjectId"));
@ -341,7 +341,7 @@ sub www_edit {
$properties->raw($_[0]->fileProperty("warranty",15));
return $_[0]->SUPER::www_edit(
-properties=>$properties->printRowsOnly,
-helpId=>1,
-helpId=>"product add/edit",
-headingId=>6
);
}
@ -379,7 +379,7 @@ sub www_editBenefit {
$session{page}{useAdminStyle} = 1;
my ($output, $data, $f, $benefits);
$data = $_[0]->getCollateral("Product_benefit","Product_benefitId",$session{form}{bid});
$output = helpIcon(6,$_[0]->get("namespace"));
$output = helpIcon("product benefit add/edit",$_[0]->get("namespace"));
$output .= '<h1>'.WebGUI::International::get(53,$_[0]->get("namespace")).'</h1>';
$f = WebGUI::HTMLForm->new;
$f->hidden("wid",$_[0]->get("wobjectId"));
@ -415,7 +415,7 @@ sub www_editFeature {
$session{page}{useAdminStyle} = 1;
my ($output, $data, $f, $features);
$data = $_[0]->getCollateral("Product_feature","Product_featureId",$session{form}{fid});
$output = helpIcon(2,$_[0]->get("namespace"));
$output = helpIcon("product feature add/edit",$_[0]->get("namespace"));
$output .= '<h1>'.WebGUI::International::get(22,$_[0]->get("namespace")).'</h1>';
$f = WebGUI::HTMLForm->new;
$f->hidden("wid",$_[0]->get("wobjectId"));
@ -451,7 +451,7 @@ sub www_editSpecification {
$session{page}{useAdminStyle} = 1;
my ($output, $data, $f, $hashRef);
$data = $_[0]->getCollateral("Product_specification","Product_specificationId",$session{form}{sid});
$output = helpIcon(3,$_[0]->get("namespace"));
$output = helpIcon("product specification add/edit",$_[0]->get("namespace"));
$output .= '<h1>'.WebGUI::International::get(25,$_[0]->get("namespace")).'</h1>';
$f = WebGUI::HTMLForm->new;
$f->hidden("wid",$_[0]->get("wobjectId"));

View file

@ -98,7 +98,7 @@ sub www_edit {
-properties=>$properties->printRowsOnly,
-privileges=>$privileges->printRowsOnly,
-headingId=>8,
-helpId=>1
-helpId=>"sql report add/edit"
);
}

View file

@ -129,7 +129,7 @@ sub www_edit {
-properties=>$properties->printRowsOnly,
-layout=>$layout->printRowsOnly,
-headingId=>5,
-helpId=>1
-helpId=>"site map add/edit"
);
}

View file

@ -562,7 +562,7 @@ sub www_edit {
-layout=>$layout->printRowsOnly,
-privileges=>$privileges->printRowsOnly,
-headingId=>2,
-helpId=>1
-helpId=>"survey add/edit"
);
return $output;
}

View file

@ -74,7 +74,7 @@ sub www_edit {
-properties=>$properties->printRowsOnly,
-layout=>$layout->printRowsOnly,
-headingId=>4,
-helpId=>1
-helpId=>"syndicated content add/edit"
);
}

View file

@ -391,7 +391,7 @@ sub www_edit {
-privileges=>$privileges->printRowsOnly,
-properties=>$properties->printRowsOnly,
-headingId=>18,
-helpId=>1
-helpId=>"user submission system add/edit"
);
}

View file

@ -232,7 +232,7 @@ sub www_edit {
-privileges => $privileges->printRowsOnly,
-properties => $properties->printRowsOnly,
-headingId => 20,
-helpId => 1,
-helpId => "web services client add/edit",
);
}

View file

@ -114,7 +114,7 @@ sub www_edit {
-properties=>$properties->printRowsOnly,
-layout=>$layout->printRowsOnly,
-headingId=>2,
-helpId=>1
-helpId=>"wobject proxy add/edit"
);
}