/[omni_gantt]/db2gantt.cgi
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 /db2gantt.cgi

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

revision 1.23 by dpavlin, Mon Sep 23 08:45:36 2002 UTC revision 1.24 by dpavlin, Mon Nov 18 08:09:58 2002 UTC
# Line 70  if (path_info()) { Line 70  if (path_info()) {
70          $im->transparent($back);          $im->transparent($back);
71          my $col = path_info(); $col =~ s,/,,g;          my $col = path_info(); $col =~ s,/,,g;
72          my ($r,$g,$b) = split(/,/,$col);          my ($r,$g,$b) = split(/,/,$col);
73          my $col = $im->colorAllocate($r,$g,$b);          $col = $im->colorAllocate($r,$g,$b);
74          $im->fill(0,0,$col);          $im->fill(0,0,$col);
75          print "Content-Length: ",length($im->png),"\n\n";          print "Content-Length: ",length($im->png),"\n\n";
76          binmode STDOUT;          binmode STDOUT;
# Line 232  my $sth = $dbh->prepare($sql) || die "sq Line 232  my $sth = $dbh->prepare($sql) || die "sq
232    
233  my %spec;       # specification hash  my %spec;       # specification hash
234    
235  my $curr_spec;  my $curr_spec = "";
236  my $curr_t = $from_t;  my $curr_t = $from_t;
237    
238  $sth->execute() || die "sql: $sql ".$dbh->errstr;  $sth->execute() || die "sql: $sql ".$dbh->errstr;

Legend:
Removed from v.1.23  
changed lines
  Added in v.1.24

  ViewVC Help
Powered by ViewVC 1.1.26