From 0c5437210e82fe9872d9b5435bda74ace8e6b71d Mon Sep 17 00:00:00 2001
From: Steve Hancock <perltidy@users.sourceforge.net>
Date: Mon, 19 Oct 2020 08:19:24 -0700
Subject: [PATCH] update comment

---
 lib/Perl/Tidy/Tokenizer.pm | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/lib/Perl/Tidy/Tokenizer.pm b/lib/Perl/Tidy/Tokenizer.pm
index 81ff8def..cd6d1d96 100644
--- a/lib/Perl/Tidy/Tokenizer.pm
+++ b/lib/Perl/Tidy/Tokenizer.pm
@@ -1759,6 +1759,11 @@ sub prepare_for_a_new_file {
                             $max_token_index );
                         if ( $next_nonblank_token ne ')' ) {
                             my $hint;
+
+                            # FIXME: this gives an error parsing something like
+                            #       $subsubs[0]()(0);
+                            # which is a valid syntax (see subsub.t).  We may
+                            # need to revise this coding.
                             error_if_expecting_OPERATOR('(');
 
                             if ( $last_nonblank_type eq 'C' ) {
-- 
2.39.5