version 1.97, 2005/02/17 23:19:44
|
version 1.98, 2005/02/22 11:43:05
|
Line 1977 BUTTONS
|
Line 1977 BUTTONS
|
$mapUrl = $self->{MAP_URL}; |
$mapUrl = $self->{MAP_URL}; |
} |
} |
|
|
|
|
# Create the composite function that renders the column on the nav map |
# Create the composite function that renders the column on the nav map |
# have to admit any language that lets me do this can't be all bad |
# have to admit any language that lets me do this can't be all bad |
# - Jeremy (Pythonista) ;-) |
# - Jeremy (Pythonista) ;-) |
Line 2005 BUTTONS
|
Line 2006 BUTTONS
|
return $result; |
return $result; |
} else { |
} else { |
my $col = ""; |
my $col = ""; |
|
my $raw_name = &$valueFunc($resource); |
my $resource_name = |
my $resource_name = |
HTML::Entities::encode(&$valueFunc($resource),"<>&\"'"); |
HTML::Entities::encode($raw_name,"<>&\"'"); |
if($option_vars) { |
if($option_vars) { |
foreach my $option_var (@$option_vars) { |
foreach my $option_var (@$option_vars) { |
|
my $checked =""; |
|
if($helper->{VARS}->{$option_var} =~ /$raw_name/) { |
|
$checked = "checked"; |
|
} |
$col .= |
$col .= |
"<td align='center'><input type='checkbox' name ='$option_var". |
"<td align='center'><input type='checkbox' name ='$option_var". |
".forminput' value='". |
".forminput' value='". |
$resource_name . "' /> </td>"; |
$resource_name . "' $checked /> </td>"; |
} |
} |
} |
} |
|
|