mirror of
https://github.com/vdr-projects/vdr.git
synced 2025-03-01 10:50:46 +00:00
Made the 'pic2mpg' script of the 'pictures' plugin work with uppercase filename extensions
This commit is contained in:
@@ -24,3 +24,8 @@ VDR Plugin 'pictures' Revision History
|
||||
- Fixed setting the OSD area.
|
||||
- Introduced 'operator const void * ()' in cString to catch cases where operator*()
|
||||
should be used.
|
||||
|
||||
2008-02-25:
|
||||
|
||||
- Made the 'pic2mpg' script of the 'pictures' plugin work with uppercase filename
|
||||
extensions (reported by Stefan Wagner <stefanwag@gmx.at>).
|
||||
|
@@ -7,7 +7,7 @@
|
||||
#
|
||||
# See the README file for copyright information and how to reach the author.
|
||||
#
|
||||
# $Id: pic2mpg 1.2 2008/02/02 11:34:43 kls Exp $
|
||||
# $Id: pic2mpg 1.3 2008/02/24 22:00:18 kls Exp $
|
||||
|
||||
## TODO implement HDTV (1920 x 1080)
|
||||
|
||||
@@ -143,7 +143,7 @@ for ($i = 0; $i < 10; $i++) { # dirs might become empty when removing empty subd
|
||||
sub ConvertFile
|
||||
{
|
||||
my ($Pict, $Mpeg) = @_;
|
||||
(my $Type) = $Pict =~ /\.([^\.]*)$/;
|
||||
(my $Type) = lc($Pict) =~ /\.([^\.]*)$/;
|
||||
if (!defined $PNMCONV{$Type}) {
|
||||
return if ($Ignore);
|
||||
die "unknown file type '$Type': '$Pict'\n";
|
||||
|
Reference in New Issue
Block a user