From 9d0ca8666b57d90914ae6706d4f3886b50e6dbb7 Mon Sep 17 00:00:00 2001
From: betateilchen <betateilchen@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Fri, 18 Mar 2016 12:50:58 +0000
Subject: [PATCH] 98_svn.pm: execute svn commands from fhem commandline

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@11079 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/contrib/98_svn.pm | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)
 create mode 100644 fhem/contrib/98_svn.pm

diff --git a/fhem/contrib/98_svn.pm b/fhem/contrib/98_svn.pm
new file mode 100644
index 000000000..0514bf487
--- /dev/null
+++ b/fhem/contrib/98_svn.pm
@@ -0,0 +1,20 @@
+# $Id$
+#
+package main;
+use strict;
+use warnings;
+
+sub CommandSvn;
+
+sub svn_Initialize($$) {
+  my %hash = (  Fn => "CommandSvn", Hlp => "[<command>],execute svn commands)" );
+  $cmds{svn} = \%hash;
+}
+
+sub CommandSvn {
+  my ($cl, $arg) = @_;
+  return qx(svn $arg);
+}
+
+
+1;