From bc1f2add7ffb589efdd1d70d1ca93ffc0af5b30a Mon Sep 17 00:00:00 2001
From: fukachan <fukachan>
Date: Sun, 14 Mar 2004 07:04:47 +0000
Subject: modify format

---
 regress/style/check_pcb.pl | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/regress/style/check_pcb.pl b/regress/style/check_pcb.pl
index 5a66a4de..13771ff5 100755
--- a/regress/style/check_pcb.pl
+++ b/regress/style/check_pcb.pl
@@ -1,6 +1,6 @@
 #!/usr/bin/env perl
 #
-# $FML: check_pcb.pl,v 1.1 2003/10/29 14:50:55 fukachan Exp $
+# $FML: check_pcb.pl,v 1.2 2004/01/04 13:36:52 fukachan Exp $
 #
 
 use strict;
@@ -9,7 +9,7 @@ use FileHandle;
 
 my $wh     = new FileHandle "|rev|sort|rev";
 my $fn     = '';
-my $format = "%23s %30s %3s %s\n";
+my $format = "%-10s %-40s %3s %s\n";
 
 $| = 1;
 
@@ -41,6 +41,7 @@ sub cleanup
 
     $s =~ s@.pm$@@;
     $s =~ s@//@/@g;
+    $s =~ s@FML/Process/@@g;
 
     return $s;
 }
-- 
cgit v1.2.1