regcomp.pl: Calculate col widths for perldebguts

I put this in originally, but somehow undid it by mistake before
committing 65aa4ca74a9c.

diff --git a/regen/regcomp.pl b/regen/regcomp.pl
index 843ef1b..5e1abfb 100644 (file)
--- a/regen/regcomp.pl
+++ b/regen/regcomp.pl
@@ -348,7 +348,7 @@ eval <<EOD;
 format GuTS =
  ^*~~
  \$cmnt[\$_]
- ^<<<<<<<<<<<<<<<<< ^<<<<<<<<< ^<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<~~
+ ^$name_fmt ^<<<<<<<<< ^$descr_fmt~~
  \$name[\$_], \$code,  \$rest[\$_]
 .
 EOD