diff options
| author | Olivier Mengué <dolmen@cpan.org> | 2016-03-31 22:13:05 +0200 |
|---|---|---|
| committer | Olivier Mengué <dolmen@cpan.org> | 2016-03-31 22:13:05 +0200 |
| commit | 6f1ed77258bb2e868db9f4bc877f120ea8d814f6 (patch) | |
| tree | ebd346d39205967280bd142584a01fcbcd1d590f /lib | |
| parent | a3aa0aeca8fd616f9875cf9befa48e6053caf108 (diff) | |
| download | eval-closure-6f1ed77258bb2e868db9f4bc877f120ea8d814f6.tar.gz eval-closure-6f1ed77258bb2e868db9f4bc877f120ea8d814f6.zip | |
Remove unneeded sort
We don't need to sort capture keys as long as we keep the same order
during the whole process which is the case with the @capture_keys
variable.
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/Eval/Closure.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Eval/Closure.pm b/lib/Eval/Closure.pm index dbe6ea1..51a6c00 100644 --- a/lib/Eval/Closure.pm +++ b/lib/Eval/Closure.pm @@ -193,7 +193,7 @@ sub _line_directive { sub _clean_eval_closure { my ($source, $captures, $alias) = @_; - my @capture_keys = sort keys %$captures; + my @capture_keys = keys %$captures; if ($ENV{EVAL_CLOSURE_PRINT_SOURCE}) { _dump_source(_make_compiler_source($source, $alias, @capture_keys)); |