aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGuillaume Rousse <guillomovitch@mandriva.org>2009-05-23 12:48:00 +0000
committerGuillaume Rousse <guillomovitch@mandriva.org>2009-05-23 12:48:00 +0000
commit981919314f9e07ad504644a1885de52752b6b881 (patch)
tree82af60cb712457bb94e2769f026138c32e43e09a
parent60f402402accaa8d30eed9851dab2cc2727a2f1f (diff)
downloadspec-helper-981919314f9e07ad504644a1885de52752b6b881.tar
spec-helper-981919314f9e07ad504644a1885de52752b6b881.tar.gz
spec-helper-981919314f9e07ad504644a1885de52752b6b881.tar.bz2
spec-helper-981919314f9e07ad504644a1885de52752b6b881.tar.xz
spec-helper-981919314f9e07ad504644a1885de52752b6b881.zip
skip PDF files (mdv bug #51128)
-rwxr-xr-xfix_eol7
1 files changed, 6 insertions, 1 deletions
diff --git a/fix_eol b/fix_eol
index 4381cf5..885dcc4 100755
--- a/fix_eol
+++ b/fix_eol
@@ -31,7 +31,12 @@ sub convert {
# check if first line has less than 80 characters and ends with \r\n
open(my $in, '<', $_) or die "Unable to open file $_: $!";
my $line = <$in>;
- if (defined $line && length($line) <= 80 && $line =~ s/\r\n$/\n/) {
+ if (
+ defined $line &&
+ length($line) <= 80 &&
+ $line !~ /^%PDF/ &&
+ $line =~ s/\r\n$/\n/
+ ) {
# process all file
my $out = File::Temp->new(DIR => '.', UNLINK => 0);
print $out $line;