# HG changeset patch
# User Heiko Schlittermann <hs@schlittermann.de>
# Date 1466518474 -7200
# Node ID d73a52cb6b5e156be5e5f3ea341761714d4b597a
# Parent  750b25c76ab02339ba4ceb325a738bc6759d22db
Fix quoting

diff -r 750b25c76ab0 -r d73a52cb6b5e lib/Nagios/Check/DNS/check_tlsa_record.pm
--- a/lib/Nagios/Check/DNS/check_tlsa_record.pm	Tue Jun 21 16:07:28 2016 +0200
+++ b/lib/Nagios/Check/DNS/check_tlsa_record.pm	Tue Jun 21 16:14:34 2016 +0200
@@ -18,7 +18,7 @@
 my $with_cname   = '^(?<cname>[_a-z]+.*\n).*';
 
 our $tmpfile = File::Temp->new();
-my $fdname = "/dev/fd/' . fileno $tmpfile;
+my $fdname = '/dev/fd/' . fileno $tmpfile;
 fcntl($tmpfile, F_SETFD, fcntl($tmpfile, F_GETFD, 0) & ~FD_CLOEXEC)
     or die "clear FD_CLOEXEC on $tmpfile: $!\n";