Bugzilla – Attachment 34978 Details for
Bug 13522
tools/viewlog.pl does not compile in older perls
Home
|
New
|
Browse
|
Search
|
[?]
|
Reports
|
Help
|
New Account
|
Log In
[x]
|
Forgot Password
Login:
[x]
[patch]
Proposed patch
0001-Bug-13522-Make-it-explicit-that-scalar-containd-a-ha.patch (text/plain), 1.12 KB, created by
Colin Campbell
on 2015-01-06 11:51:53 UTC
(
hide
)
Description:
Proposed patch
Filename:
MIME Type:
Creator:
Colin Campbell
Created:
2015-01-06 11:51:53 UTC
Size:
1.12 KB
patch
obsolete
>From ccd34dfaf8e30699ed108b26716be0a4be28fcce Mon Sep 17 00:00:00 2001 >From: Colin Campbell <colin.campbell@ptfs-europe.com> >Date: Tue, 6 Jan 2015 11:40:46 +0000 >Subject: [PATCH] Bug 13522: Make it explicit that scalar containd a hash ref > >Prior to perl 5.12 keys can only operate on a hash. So although >$data[0] ( thats an abysmal variable name! ) will contain a hash ref >the perl compiler cannot deduce that from the context and gives >a syntax error. Add the hash sigil to make the context explicit and >the compiler can generate the correct code. >--- > tools/viewlog.pl | 2 +- > 1 file changed, 1 insertion(+), 1 deletion(-) > >diff --git a/tools/viewlog.pl b/tools/viewlog.pl >index 9f68a8a..e526c1f 100755 >--- a/tools/viewlog.pl >+++ b/tools/viewlog.pl >@@ -211,7 +211,7 @@ if ($do_it) { > > # First line with heading > # Exporting bd id seems useless >- my @headings = grep { $_ ne 'action_id' } sort keys $data[0]; >+ my @headings = grep { $_ ne 'action_id' } sort keys %{$data[0]}; > if ( $csv->combine(@headings) ) { > $content .= $csv->string() . "\n"; > } >-- >2.1.0 >
You cannot view the attachment while viewing its details because your browser does not support IFRAMEs.
View the attachment on a separate page
.
View Attachment As Diff
View Attachment As Raw
Actions:
View
|
Diff
|
Splinter Review
Attachments on
bug 13522
:
34978
|
35034
|
35041