From f6adb3220266e2fc297d582c5fa24483890dc0c9 Mon Sep 17 00:00:00 2001
From: Klaus Schmidinger <vdr@tvdr.de>
Date: Thu, 2 May 2013 10:23:11 +0200
Subject: [PATCH] Fixed unwanted version tag on checkout of older version

---
 HISTORY   | 2 ++
 newplugin | 6 +++---
 2 files changed, 5 insertions(+), 3 deletions(-)

diff --git a/HISTORY b/HISTORY
index eba5fc2d..fdffafa7 100644
--- a/HISTORY
+++ b/HISTORY
@@ -7807,6 +7807,7 @@ Video Disk Recorder Revision History
 - Fixed no longer generating any editing marks if the edited recording results in just
   one single sequence (reported by Halim Sahin).
 - Fixed an error message when parsing SCR values in diseqc.conf.
+- Fixed an unexpected RCS version tag in the newplugin script.
 
 2013-05-02: Version 2.1.1
 
@@ -7834,3 +7835,4 @@ Video Disk Recorder Revision History
 - Fixed no longer generating any editing marks if the edited recording results in just
   one single sequence (reported by Halim Sahin).
 - Fixed an error message when parsing SCR values in diseqc.conf.
+- Fixed an unexpected RCS version tag in the newplugin script.
diff --git a/newplugin b/newplugin
index 58cf85c0..150649c5 100755
--- a/newplugin
+++ b/newplugin
@@ -12,7 +12,7 @@
 # See the main source file 'vdr.c' for copyright information and
 # how to reach the author.
 #
-# $Id: newplugin 2.17 2013/01/12 13:46:00 kls Exp $
+# $Id: newplugin 3.1 2013/05/02 10:06:09 kls Exp $
 
 $PLUGIN_NAME = $ARGV[0] || die "Usage: newplugin <name>\n";
 
@@ -352,8 +352,8 @@ The next steps you should perform now are:
 
 sub CreateFile
 {
-  my ($Name, $Content) = @_;
-  open(FILE, ">$PLUGINDIR/$Name") || die "$Name:  $!\n";
+  my ($FileName, $Content) = @_;
+  open(FILE, ">$PLUGINDIR/$FileName") || die "$FileName: $!\n";
   print FILE $Content;
   close(FILE);
 }