File user profile fields now link to file

This commit is contained in:
Graham Knop 2007-10-04 21:28:44 +00:00
parent 3c5a801a29
commit 1c92b36f5d
2 changed files with 2 additions and 1 deletions

View file

@ -143,7 +143,7 @@ sub displayValue {
return '' unless $self->get("value");
my $location = WebGUI::Storage->get($self->session,$self->get("value"));
my $file = shift @{ $location->getFiles };
my $fileValue = sprintf qq|<img src="%s" />&nbsp;%s|, $location->getFileIconUrl($file), $file;
my $fileValue = sprintf qq|<img src="%s" />&nbsp;<a href="%s">%s</a>|, $location->getFileIconUrl($file), $location->getUrl($file), $file;
return $fileValue;
}