From: Peter Stamfest <peter@stamfest.at>
Date: Sat, 8 Mar 2014 08:22:37 +0000 (+0100)
Subject: Make modify command available using RRDs
X-Git-Tag: v1.5.0-rc1~120^2~2
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=c77b6b7a567bd787baa98a9e459bd64e9ef39154;p=thirdparty%2Frrdtool-1.x.git

Make modify command available using RRDs
---

diff --git a/bindings/perl-shared/RRDs.pm b/bindings/perl-shared/RRDs.pm
index 211480c1..8ca1d4a2 100644
--- a/bindings/perl-shared/RRDs.pm
+++ b/bindings/perl-shared/RRDs.pm
@@ -30,6 +30,7 @@ RRDs - Access RRDtool as a shared module
   RRDs::graph ...
   RRDs::fetch ...
   RRDs::tune ...
+  RRDs::modify ...
   RRDs::times(start, end)
   RRDs::dump ...
   RRDs::restore ...
diff --git a/bindings/perl-shared/RRDs.xs b/bindings/perl-shared/RRDs.xs
index 266b5e34..774fc9f8 100644
--- a/bindings/perl-shared/RRDs.xs
+++ b/bindings/perl-shared/RRDs.xs
@@ -189,6 +189,18 @@ rrd_tune(...)
 	OUTPUT:
 		RETVAL
 
+int
+rrd_modify(...)
+	PROTOTYPE: @	
+	PREINIT:
+        int i;
+	char **argv;
+	CODE:
+		rrdcode(rrd_modify);
+       	        RETVAL = 1;
+	OUTPUT:
+		RETVAL
+
 SV *
 rrd_graph(...)
 	PROTOTYPE: @