/[Sack]/trunk/lib/Sack/Color.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/lib/Sack/Color.pm

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

revision 140 by dpavlin, Wed Oct 7 20:14:58 2009 UTC revision 141 by dpavlin, Wed Oct 7 20:42:46 2009 UTC
# Line 21  sub BEGIN { Line 21  sub BEGIN {
21                          $msg .= " in $loc[1] +$loc[2]\n" if @loc;                          $msg .= " in $loc[1] +$loc[2]\n" if @loc;
22                  }                  }
23                  $msg =~ s{\[(0|\d\d\d\d)\]}{ '[' . port2color($1) . ']' }eg;                  $msg =~ s{\[(0|\d\d\d\d)\]}{ '[' . port2color($1) . ']' }eg;
24                  print STDERR $msg unless $msg =~ m{^#} || $ENV{DEBUG};                  print STDERR $msg unless $msg =~ m{^#} && ! $ENV{DEBUG};
25                  return 1;                  return 1;
26          };          };
27    
Legend:
Removed from v.140  
changed lines
  Added in v.141
  ViewVC Help
Powered by ViewVC 1.1.26