feature added: ability to set rank from webservice upload.

git-svn-id: http://piwigo.org/svn/trunk@2520 68402e56-0260-453c-a942-63ccdbb3a9ee
This commit is contained in:
plegall 2008-09-11 22:19:04 +00:00
commit 272113c417
3 changed files with 7 additions and 3 deletions

View file

@ -10,7 +10,7 @@ use Getopt::Long;
my %opt = ();
GetOptions(
\%opt,
qw/action=s file=s thumbnail=s category_id=i name=s/
qw/action=s file=s thumbnail=s category_id=i name=s rank=i/
);
our $ua = LWP::UserAgent->new;
@ -61,6 +61,7 @@ if ($opt{action} eq 'pwg.images.add') {
thumbnail_content => $thumbnail_content,
category_id => $opt{category_id},
name => $opt{name},
rank => defined($opt{rank}) ? $opt{rank} : 1,
};
my $response = $ua->post(