Prevent Form/File from returning links in getValueAsHtml if there's

no real value in the storage element to return.

docs/changelog/7.x.x.txt

@@ -24,6 +24,7 @@
  - fixed #10228: Calendar: Weekly re-occurence function not working properly ( Martin Kamerbeek / Oqapi )
  - fixed #9851: New Users have blank profile field privacy settings (United Knowledge)
  - fixed #10208: Account/Inbox.pm site invititations
+ - fixed #10355: Thingy: dirty delete FileField value
 
 7.7.8
  - fixed: Basic Auth doesn't work if password contains colon (Arjan Widlak,

lib/WebGUI/Form/File.pm

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