sub settings { ( my $self, %AUBBC ) = ( @_, %AUBBC ); if ( exists $AUBBC{ highlight_function } ) { $AUBBC{ highlight_function } = \&code_highlight unless check_subroutine( $AUBBC{ highlight_function } ); $AUBBC{ highlight } = 0; } settings_prep();