http://7fh6tueqddpjyxjmgtdiueylzoqt6pt7hec3pukyptlmohoowvhde4yd.onion/public-inbox.git/tree/lib/PublicInbox/IMAPsearchqp.pm
( $IH2X { $field_name } // '' ) : '' ; xap_only ( $self , lc ( join ( ' ' , map { qq [ $xk " $_ " ] } split ( /[\*"\s]+/ , $s )))); 1 ; } sub subq_enter { xap_only ( $q ); my $old = delete ( $q ->{ xap }) // []; my $nr = push @ { $q ->{ stack }}, $old ; die 'BAD deep recursion' if $nr > 10 ; $q ->{ xap } = []; } sub subq_leave { my $child = delete $q ->{ xap }; my $parent = $q ->{ xap } = pop @ { $q ->{ stack }}; push ( @ $parent , @ $child > 1 ? '(' . join ( ' ' , @...