[Bio] / FigKernelPackages / HTML.pm Repository:
ViewVC logotype

Diff of /FigKernelPackages/HTML.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.25, Mon Dec 6 18:26:05 2004 UTC revision 1.26, Fri Dec 17 21:32:57 2004 UTC
# Line 11  Line 11 
11    
12  sub compute_html_header  sub compute_html_header
13  {  {
14        my($additional_insert) = @_;
15      my $html_hdr_file = "./Html/html.hdr";      my $html_hdr_file = "./Html/html.hdr";
16      if (! -f $html_hdr_file)      if (! -f $html_hdr_file)
17      {      {
# Line 33  Line 34 
34          }          }
35          my $host = &FIG::get_local_hostname();          my $host = &FIG::get_local_hostname();
36          $insert_stuff = "SEED version <b>$ver</b> on $host";          $insert_stuff = "SEED version <b>$ver</b> on $host";
37            if ($additional_insert)
38            {
39                $insert_stuff .= "<br>" . $additional_insert;
40            }
41    
42          for $_ (@html_hdr)          for $_ (@html_hdr)
43          {          {

Legend:
Removed from v.1.25  
changed lines
  Added in v.1.26

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3