[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.25, Fri Dec 10 07:04:39 2004 UTC revision 1.26, Wed Jan 5 20:24:14 2005 UTC
# Line 672  Line 672 
672      # We may have to move this a little earlier, and show probably throw some nicer      # We may have to move this a little earlier, and show probably throw some nicer
673      # errors to the end user (.e.g try setting can_alter and choosing an illegitimate ss      # errors to the end user (.e.g try setting can_alter and choosing an illegitimate ss
674      # Do we know about this subsystem:      # Do we know about this subsystem:
675      unless (grep {/$ssa/} map {$_->[0]} &existing_subsystem_annotations)      my $ssaQ = quotemeta $ssa;
676        unless (grep {/$ssaQ/} map {$_->[0]} &existing_subsystem_annotations)
677      {      {
678       # No, we don't know about this subsystem       # No, we don't know about this subsystem
679       my $url = &FIG::cgi_url . "/subsys.cgi?user=$user";       my $url = &FIG::cgi_url . "/subsys.cgi?user=$user";

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

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3