Changeset 13810


Ignore:
Timestamp:
2007-01-25T17:15:30+13:00 (17 years ago)
Author:
mdewsnip
Message:

All actions are now passed the timestamp argument.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/gsdl/cgi-bin/gliserver.pl

    r13809 r13810  
    6262
    6363    if ($cmd eq "delete-collection") {
    64     &delete_collection($gsdl_cgi, $username);
     64    &delete_collection($gsdl_cgi, $username, $timestamp);
    6565    }
    6666    elsif ($cmd eq "download-collection") {
    67     &download_collection($gsdl_cgi, $username);
     67    &download_collection($gsdl_cgi, $username, $timestamp);
    6868    }
    6969    elsif ($cmd eq "download-collection-archives") {
    70     &download_collection_archives($gsdl_cgi, $username);
     70    &download_collection_archives($gsdl_cgi, $username, $timestamp);
    7171    }
    7272    elsif ($cmd eq "download-collection-configurations") {
    73     &download_collection_configurations($gsdl_cgi, $username);
     73    &download_collection_configurations($gsdl_cgi, $username, $timestamp);
    7474    }
    7575    elsif ($cmd eq "download-collection-file") {
    76     &download_collection_file($gsdl_cgi, $username);
     76    &download_collection_file($gsdl_cgi, $username, $timestamp);
    7777    }
    7878    elsif ($cmd eq "delete-collection-file") {
    79     &delete_collection_file($gsdl_cgi, $username);
     79    &delete_collection_file($gsdl_cgi, $username, $timestamp);
    8080    }
    8181    elsif ($cmd eq "get-script-options") {
    82     &get_script_options($gsdl_cgi, $username);
     82    &get_script_options($gsdl_cgi, $username, $timestamp);
    8383    }
    8484    elsif ($cmd eq "move-collection-file") {
    85     &move_collection_file($gsdl_cgi, $username);
     85    &move_collection_file($gsdl_cgi, $username, $timestamp);
    8686    }
    8787    elsif ($cmd eq "new-collection-directory") {
    88     &new_collection_directory($gsdl_cgi, $username);
     88    &new_collection_directory($gsdl_cgi, $username, $timestamp);
    8989    }
    9090    elsif ($cmd eq "run-script") {
    91     &run_script($gsdl_cgi, $username);
     91    &run_script($gsdl_cgi, $username, $timestamp);
    9292    }
    9393    elsif ($cmd eq "timeout-test") {
    … …  
    9595    }
    9696    elsif ($cmd eq "upload-collection-file") {
    97     &upload_collection_file($gsdl_cgi, $username);
     97    &upload_collection_file($gsdl_cgi, $username, $timestamp);
    9898    }
    9999    else {
    … …  
    270270sub delete_collection
    271271{
    272     my ($gsdl_cgi, $username) = @_;
     272    my ($gsdl_cgi, $username, $timestamp) = @_;
    273273
    274274    my $collection = $gsdl_cgi->clean_param("c");
    … …  
    306306sub delete_collection_file
    307307{
    308     my ($gsdl_cgi, $username) = @_;
     308    my ($gsdl_cgi, $username, $timestamp) = @_;
    309309
    310310    my $collection = $gsdl_cgi->clean_param("c");
    … …  
    350350sub download_collection
    351351{
    352     my ($gsdl_cgi, $username) = @_;
     352    my ($gsdl_cgi, $username, $timestamp) = @_;
    353353
    354354    my $collection = $gsdl_cgi->clean_param("c");
    … …  
    397397sub download_collection_archives
    398398{
    399     my ($gsdl_cgi, $username) = @_;
     399    my ($gsdl_cgi, $username, $timestamp) = @_;
    400400
    401401    my $collection = $gsdl_cgi->clean_param("c");
    … …  
    445445sub download_collection_configurations
    446446{
    447     my ($gsdl_cgi, $username) = @_;
     447    my ($gsdl_cgi, $username, $timestamp) = @_;
    448448
    449449    # Users can be in any group to perform this action
    … …  
    479479sub download_collection_file
    480480{
    481     my ($gsdl_cgi, $username) = @_;
     481    my ($gsdl_cgi, $username, $timestamp) = @_;
    482482
    483483    my $collection = $gsdl_cgi->clean_param("c");
    … …  
    537537sub get_script_options
    538538{
    539     my ($gsdl_cgi, $username) = @_;
     539    my ($gsdl_cgi, $username, $timestamp) = @_;
    540540
    541541    my $script = $gsdl_cgi->clean_param("script");
    … …  
    583583sub move_collection_file
    584584{
    585     my ($gsdl_cgi, $username) = @_;
     585    my ($gsdl_cgi, $username, $timestamp) = @_;
    586586
    587587    my $collection = $gsdl_cgi->clean_param("c");
    … …  
    633633sub new_collection_directory
    634634{
    635     my ($gsdl_cgi, $username) = @_;
     635    my ($gsdl_cgi, $username, $timestamp) = @_;
    636636
    637637    my $collection = $gsdl_cgi->clean_param("c");
    … …  
    680680sub run_script
    681681{
    682     my ($gsdl_cgi, $username) = @_;
     682    my ($gsdl_cgi, $username, $timestamp) = @_;
    683683
    684684    my $script = $gsdl_cgi->clean_param("script");
    … …  
    746746sub upload_collection_file
    747747{
    748     my ($gsdl_cgi, $username) = @_;
     748    my ($gsdl_cgi, $username, $timestamp) = @_;
    749749
    750750    my $collection = $gsdl_cgi->clean_param("c");
Note: See TracChangeset for help on using the changeset viewer.