simplify $var->{..}->{..} to $var->{..}{..}

diff --git a/bin/fcscs b/bin/fcscs
index b2bef5d38dc0ae6d372fdc28bbabdd4c14b6d7d1..29499d2c82d7d65e95849348630d6704f0c84320 100755 (executable)
--- a/bin/fcscs
+++ b/bin/fcscs
@@ -513,7 +513,7 @@ sub select_match {
     return if @{$matches} == 0;
     # Don't return on initial run to give the user a chance to select another
     # mode, e.g. to switch from URL selection to search selection.
-    if (@{$matches} == 1 and not $config->{state}->{initial}) {
+    if (@{$matches} == 1 and not $config->{state}{initial}) {
         return { match => $matches->[0] };
     }
     $config->{state}{initial} = 0;
@@ -1381,8 +1381,8 @@ RESULT:
             goto RESULT; # reprocess special entries in result
         }
         if (defined $result->{match}) {
-            if (not defined $result->{match}->{value}) {
-                $result->{match}->{value} = $result->{match}->{string};
+            if (not defined $result->{match}{value}) {
+                $result->{match}{value} = $result->{match}{string};
             }
 
             debug \%config, 'input', 'running handler';
@@ -1390,7 +1390,7 @@ RESULT:
             # Choose handler with falling priority.
             my @handlers = (
                 $config{state}{handler},     # set by user
-                $result->{match}->{handler}, # set by match
+                $result->{match}{handler},   # set by match
                 $result->{handler},          # set by mapping
                 $config{handler}{yank},      # fallback
             );