From 1383e93cf597c963f22b0fa7b2c181e57070ef08 Mon Sep 17 00:00:00 2001 From: Steve Hancock Date: Fri, 1 Nov 2024 16:48:04 -0700 Subject: [PATCH] add case b1497 --- dev-bin/run_convergence_tests.pl.data | 16 ++++++++++++++++ dev-bin/run_convergence_tests.pl.expect | 8 ++++++++ 2 files changed, 24 insertions(+) diff --git a/dev-bin/run_convergence_tests.pl.data b/dev-bin/run_convergence_tests.pl.data index 0cce851d..8503f2b1 100644 --- a/dev-bin/run_convergence_tests.pl.data +++ b/dev-bin/run_convergence_tests.pl.data @@ -12441,6 +12441,22 @@ a b c d e ); --break-at-trailing-comma-types='i' --qw-as-function +==> b1497.in <== + $c->CanvasBind ( '<2>' => [sub { area_down (@_) }, \%pinfo], + ); + $c->CanvasBind ( + '<2>' => [sub { area_down (@_) }, \%pinfo], ); + +==> b1497.par <== +--maximum-line-length=61 +--line-up-parentheses +--variable-maximum-line-length +--paren-vertical-tightness=1 +--space-function-paren +--square-bracket-tightness=2 +--break-at-trailing-comma-types='h' +--interbracket-arrow-style='}->[' + ==> b1498.in <== $c->addtag( 'active', 'withtag', ruler_make_tab( $c, $x, $y, $rinfo ), ); diff --git a/dev-bin/run_convergence_tests.pl.expect b/dev-bin/run_convergence_tests.pl.expect index c90d98cf..69a73323 100644 --- a/dev-bin/run_convergence_tests.pl.expect +++ b/dev-bin/run_convergence_tests.pl.expect @@ -8410,6 +8410,14 @@ my @abc = qw( a b c d e ); +==> b1497 <== + $c->CanvasBind ( + '<2>' => [sub { area_down (@_) }, \%pinfo], + ); + $c->CanvasBind ( + '<2>' => [sub { area_down (@_) }, \%pinfo], + ); + ==> b1498 <== $c->addtag( 'active', 'withtag', -- 2.39.5