aboutsummaryrefslogtreecommitdiffstats
path: root/tools/piwigo_remote.pl
diff options
context:
space:
mode:
authorplegall <plg@piwigo.org>2008-10-01 21:08:51 +0000
committerplegall <plg@piwigo.org>2008-10-01 21:08:51 +0000
commit600e2d87ecc359b3bd202c4b471c042f319e1e2b (patch)
treee3c09337a0e31213fa12b6233ec74a4f01259852 /tools/piwigo_remote.pl
parent610e5ada6e8e5876a7275e827abf45b849dba06b (diff)
feature 874 added: new Web API method pwg.tags.add.
git-svn-id: http://piwigo.org/svn/trunk@2634 68402e56-0260-453c-a942-63ccdbb3a9ee
Diffstat (limited to 'tools/piwigo_remote.pl')
-rw-r--r--tools/piwigo_remote.pl15
1 files changed, 15 insertions, 0 deletions
diff --git a/tools/piwigo_remote.pl b/tools/piwigo_remote.pl
index 02e447eab..776802589 100644
--- a/tools/piwigo_remote.pl
+++ b/tools/piwigo_remote.pl
@@ -152,6 +152,21 @@ if ($opt{action} eq 'pwg.categories.add') {
print Dumper(from_json($response->content));
}
+if ($opt{action} eq 'pwg.tags.add') {
+ $form = {
+ method => 'pwg.tags.add',
+ name => $opt{define}{name},
+ };
+
+ my $response = $ua->post(
+ $conf{base_url}.'/ws.php?format=json',
+ $form
+ );
+
+ use Data::Dumper;
+ print Dumper(from_json($response->content));
+}
+
$query = pwg_ws_get_query(
method => 'pwg.session.logout'
);