From e0cdb22d0d3192b51b923bb608123f0021dc5ea7 Mon Sep 17 00:00:00 2001 From: ian Date: Fri, 6 Feb 2004 23:49:32 +0000 Subject: [PATCH] remove debug stuff --- layout/layout | 5 ----- 1 file changed, 5 deletions(-) diff --git a/layout/layout b/layout/layout index 35bbcac..7bcd88a 100755 --- a/layout/layout +++ b/layout/layout @@ -945,19 +945,14 @@ sub layer_draw ($$) { $r= 'ARSCLMNO'; } foreach $eo (@eopts) { -print STDERR "layer_draw E ($k,$l) /^$eo->{GlobRe}/\n"; next unless $k =~ m/^$eo->{GlobRe}$/; -print STDERR "layer_draw E ($k,$l) lc\n"; next unless &{ $eo->{LayerCheck} }($l); -print STDERR "layer_draw E ($k,$l) amend $eo->{DrawMods}\n"; foreach $cc (split //, $eo->{DrawMods}) { $r =~ s/$cc//ig; $r .= $cc if $cc =~ m/[A-Z]/; } } -print STDERR "layer_draw A ($k,$l) = $r\n"; $r= &{ $ctx->{DrawMap} }($r); -print STDERR "layer_draw B ($k,$l) = $r\n"; return $r; } -- 2.30.2