mirror of
https://github.com/vdr-projects/vdr.git
synced 2025-03-01 10:50:46 +00:00
Removed trailing whitespace
This commit is contained in:
@@ -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);
|
||||
|
||||
Reference in New Issue
Block a user