add default hover help for databaseLink

This commit is contained in:
Colin Kuskie 2005-06-27 02:51:08 +00:00
parent 80d0116f53
commit f90672ba83
2 changed files with 6 additions and 0 deletions

View file

@ -865,6 +865,7 @@ sub databaseLink {
rearrange([qw(name value label afterEdit extras uiLevel defaultValue hoverHelp)], @p);
if (_uiLevelChecksOut($uiLevel)) {
$label = $label || WebGUI::International::get(1075);
$hoverHelp = $hoverHelp || WebGUI::International::get('1075 description');
if (WebGUI::Grouping::isInGroup(3)) {
if ($afterEdit) {
$subtext = editIcon("op=editDatabaseLink&lid=".$value."&afterEdit=".WebGUI::URL::escape($afterEdit));