/[drupal]/drupal/scripts/code-style.pl
ViewVC logotype

Diff of /drupal/scripts/code-style.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.11, Tue Feb 21 18:46:54 2006 UTC revision 1.12, Sat Oct 14 10:03:27 2006 UTC
# Line 1  Line 1 
1  #!/usr/bin/perl -w  #!/usr/bin/perl -w
2  # $Id: code-style.pl,v 1.10 2005/12/28 12:04:14 dries Exp $  # $Id: code-style.pl,v 1.11 2006/02/21 18:46:54 dries Exp $
3    
4  # Author: Alexander Schwartz (alexander.schwartz@gmx.net)  # Author: Alexander Schwartz (alexander.schwartz@gmx.net)
5  # Licence: GPL  # Licence: GPL
# Line 9  Line 9 
9  # code.  This program tries to show as many improvements as possible with  # code.  This program tries to show as many improvements as possible with
10  # no false positives.  # no false positives.
11    
12  # $Id: code-style.pl,v 1.10 2005/12/28 12:04:14 dries Exp $  # $Id: code-style.pl,v 1.11 2006/02/21 18:46:54 dries Exp $
13    
14  $comment = 0;  $comment = 0;
15  $program = 0;  $program = 0;
# Line 116  while (<>) { Line 116  while (<>) {
116    elsif (/([\(\[]) / && $program) {    elsif (/([\(\[]) / && $program) {
117      $msg = "'$1 ' -> '$1'";      $msg = "'$1 ' -> '$1'";
118    }    }
119    elsif (/ ([\)\]])/ && $program) {    elsif (/\S ([\)\]])/ && $program) {
120      $msg = "' $1' -> '$1'";      $msg = "' $1' -> '$1'";
121    }    }
122    # but no brackets    # but no brackets
Legend:
Removed from v.1.11  
changed lines
  Added in v.1.12
  ViewVC Help
Powered by ViewVC 1.1.2