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

Diff of /FigWebServices/rast_submit_server.cgi

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

revision 1.9, Fri Nov 20 17:54:21 2009 UTC revision 1.10, Tue Mar 30 21:50:10 2010 UTC
# Line 26  Line 26 
26                   status_of_RAST_job                   status_of_RAST_job
27                   kill_RAST_job                   kill_RAST_job
28                   delete_RAST_job                   delete_RAST_job
29                     copy_to_RAST_dir
30                   get_job_metadata                   get_job_metadata
31                  );                  );
32    
# Line 156  Line 157 
157    
158      my $rast_obj = new RAST_submission($rast_dbmaster, $dbmaster, $user_obj);      my $rast_obj = new RAST_submission($rast_dbmaster, $dbmaster, $user_obj);
159    
160        if ($function eq 'copy_to_RAST_dir')
161        {
162            #
163            # For the copy, we pluck the file upload
164            # from the CGI and give it to the handler as well.
165            #
166            my $file = $cgi->upload('file');
167    
168            my $params = $args[0];
169            $params->{-from} = $file if ref($params) eq 'HASH';
170        }
171    
172      #      #
173      # We handle retrieve in a different manner.      # We handle retrieve in a different manner.

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

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3