We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 7affbc1 commit b8a668eCopy full SHA for b8a668e
trunk/export/XviD.pm
@@ -1,5 +1,5 @@
1
#!/usr/bin/perl -w
2
-#Last Updated: 2004.09.26 (xris)
+#Last Updated: 2004.11.02 (xris)
3
#
4
# export::XviD
5
# Maintained by Chris Petersen <mythtv@forevermore.net>
@@ -129,6 +129,7 @@ package export::XviD;
129
# Height will default to whatever is the appropriate aspect ratio for the width
130
# someday, we should check the aspect ratio here, too...
131
$self->{'height'} = sprintf('%.0f', $self->{'width'} * 3/4);
132
+ $self->{'height'}++ if ($self->{'height'} % 2);
133
# Ask about the height
134
if ($Args{'height'}) {
135
die "Height must be > 0\n" unless ($Args{'height'} > 0);
0 commit comments