diff options
| author | Klaus Schmidinger <vdr@tvdr.de> | 2013-02-17 13:19:36 +0100 |
|---|---|---|
| committer | Klaus Schmidinger <vdr@tvdr.de> | 2013-02-17 13:19:36 +0100 |
| commit | 3ca58a42e7805b2bdf8537f6a1c7fa4717675f9f (patch) | |
| tree | f5a2807b626631e6ec05df3f8676b1f2488342d3 /PLUGINS/src/pictures/pic2mpg | |
| parent | 212a2fea41bf1d232d28f988de442b4cea56960b (diff) | |
| download | vdr-3ca58a42e7805b2bdf8537f6a1c7fa4717675f9f.tar.gz vdr-3ca58a42e7805b2bdf8537f6a1c7fa4717675f9f.tar.bz2 | |
Removed trailing whitespace
Diffstat (limited to 'PLUGINS/src/pictures/pic2mpg')
| -rwxr-xr-x | PLUGINS/src/pictures/pic2mpg | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/PLUGINS/src/pictures/pic2mpg b/PLUGINS/src/pictures/pic2mpg index 2895ca8c..2ba8de78 100755 --- a/PLUGINS/src/pictures/pic2mpg +++ b/PLUGINS/src/pictures/pic2mpg @@ -7,7 +7,7 @@ # # See the README file for copyright information and how to reach the author. # -# $Id: pic2mpg 2.4 2012/01/08 13:27:17 kls Exp $ +# $Id: pic2mpg 2.5 2013/02/17 13:17:13 kls Exp $ use File::Path; use File::Spec; @@ -37,9 +37,9 @@ $Verbose = $opt_v; $ListFiles = $Verbose >= 1; $Detailed = $Verbose >= 2; -# Supported picture types: +# Supported picture types: -%PICTYPES = ( +%PICTYPES = ( bmp => 1, gif => 1, jpeg => 1, @@ -135,7 +135,7 @@ sub ConvertFile return if (!defined $PICTYPES{$Type}); my $Exif = ImageInfo($Pict); my $Orientation = $$Exif{"Orientation"}; - my ($Degrees) = $Orientation =~ /Rotate ([0-9]+)/; + my ($Degrees) = $Orientation =~ /Rotate ([0-9]+)/; my $Rotate = $Degrees ? "-rotate $Degrees" : ""; print "orientation = '$Orientation' -> rotation = $Rotate\n" if ($Detailed); $Pict = EscapeMeta($Pict); |