[Bio] / FigWebServices / subsys.cgi Repository:
ViewVC logotype

Diff of /FigWebServices/subsys.cgi

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

revision 1.9, Sun Oct 10 17:13:55 2004 UTC revision 1.10, Mon Oct 11 13:41:14 2004 UTC
# Line 413  Line 413 
413      if (&handle_role_and_subset_changes($fig,$subsystem,$cgi,$html))      if (&handle_role_and_subset_changes($fig,$subsystem,$cgi,$html))
414      {      {
415          &process_spreadsheet_changes($fig,$subsystem,$cgi,$html);          &process_spreadsheet_changes($fig,$subsystem,$cgi,$html);
416    
417          $subsystem->write_subsystem();          $subsystem->write_subsystem();
418          &produce_html_to_display_subsystem($fig,$subsystem,$cgi,$html);          &produce_html_to_display_subsystem($fig,$subsystem,$cgi,$html);
419      }      }
# Line 737  Line 738 
738                               -name => "extend_with_billogix"),                               -name => "extend_with_billogix"),
739               $cgi->br);               $cgi->br);
740      }      }
741    
742        my $notes = $cgi->param('notes');
743        if (! $notes)
744        {
745            $notes = $subsystem->get_notes();
746        }
747        else
748        {
749            $subsystem->set_notes($notes);
750        }
751        push(@$html,$cgi->hr,"NOTES:\n",$cgi->br,$cgi->textarea(-name => 'notes', -rows => 40, -cols => 100, -value => $notes));
752    
753      push(@$html, $cgi->end_form);      push(@$html, $cgi->end_form);
754    
755      push(@$html, $cgi->hr);      push(@$html, $cgi->hr);
# Line 776  Line 789 
789          &align_column($fig,$cgi,$html,$col,$subsystem);          &align_column($fig,$cgi,$html,$col,$subsystem);
790      }      }
791    
     my $notes = $cgi->param('notes');  
     if (! $notes)  
     {  
         $notes = $subsystem->get_notes();  
     }  
     else  
     {  
         $subsystem->set_notes($notes);  
     }  
     push(@$html,$cgi->hr,"NOTES:\n",$cgi->br,$cgi->textarea(-name => 'notes', -rows => 40, -cols => 100, -value => $notes));  
792  }  }
793    
794  sub format_extend_with {  sub format_extend_with {

Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3