diff options
author | Klaus Schmidinger <vdr@tvdr.de> | 2013-05-02 10:21:37 +0200 |
---|---|---|
committer | Klaus Schmidinger <vdr@tvdr.de> | 2013-05-02 10:21:37 +0200 |
commit | 90f4648a7c49ec8350e159fa9d29bb60c4f0b77a (patch) | |
tree | 27a24e2b3cf57ace6e7e3a31ba9ab0ffa1afed20 /newplugin | |
parent | be88699b005a51eae2b09d4b057966446be1ee95 (diff) | |
download | vdr-90f4648a7c49ec8350e159fa9d29bb60c4f0b77a.tar.gz vdr-90f4648a7c49ec8350e159fa9d29bb60c4f0b77a.tar.bz2 |
Fixed unwanted version tag on checkout of older version
Diffstat (limited to 'newplugin')
-rwxr-xr-x | newplugin | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -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 2.17.1.1 2013/05/02 10:04:06 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); } |