sub html_record { # -------------------------------------------------------- # How a record will be displayed. This is used primarily in # returning search results and how it is formatted. The record to # be displayed will be in the %rec hash. my (%rec) = @_; # Load any defaults to put in the VALUE field. ($db_auto_generate and print &build_html_record(%rec) and return); my $font_color = 'Font face="Verdana, Arial, Helvetica" Size=2 Color=#003399'; my $font = 'Font face="Verdana, Arial, Helvetica" Size=2'; print qq| <$font_color>ID:  <$font>$rec{'ID'} <$font_color>Title:  <$font>$rec{'Title'} <$font_color>URL:  <$font>$rec{'URL'} <$font_color>Type:  <$font>$rec{'Type'} <$font_color>Date:  <$font>$rec{'Date'} <$font_color>Category:  <$font>$rec{'Category'} <$font_color>Description:  <$font>$rec{'Description'} <$font_color>Validated:  <$font>$rec{'Validated'} <$font_color>Popular:  <$font>$rec{'Popular'} |; }