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

Diff of /FigWebServices/assignments.cgi

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

revision 1.3, Tue Feb 3 23:08:53 2004 UTC revision 1.4, Tue Feb 10 18:44:58 2004 UTC
# Line 263  Line 263 
263    
264      my $user = $cgi->param('user');      my $user = $cgi->param('user');
265      my $set  = $cgi->param('set');      my $set  = $cgi->param('set');
266        my @flds = split(/:/,$set);
267        my $who = $flds[4];
268    
269      if ($user)      if ($user)
270      {      {
271          my $userR = $user;          my $userR = $user;
272          $userR =~ s/^master://;          if ($userR =~ s/^master://)
273          if (system("$FIG_Config::bin/fig assign_functionF $user $FIG_Config::data/Assignments/$userR/$set > /dev/null") == 0)          {
274                $who = "master:$who";
275            }
276    
277            if (system("$FIG_Config::bin/fig assign_functionF $who $FIG_Config::data/Assignments/$userR/$set > /dev/null") == 0)
278          {          {
279              push(@$html,$cgi->h1("Made Assignments from $set"));              push(@$html,$cgi->h1("Made Assignments from $set"));
280          }          }

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3