Changeset 286


Ignore:
Timestamp:
Sep 25, 2017, 9:10:25 PM (7 years ago)
Author:
g7moreau
Message:
  • Change date box
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/klask

    r285 r286  
    28282828   $mon++;
    28292829   my $date = sprintf '%04i-%02i-%02i %02i:%02i', $year, $mon, $mday, $hour, $min;
    2830    print "\"$date\" [color=white, fillcolor=black, shape=polygon, sides=14, style=filled, fontcolor=white];\n";
    2831    print "site -> \"$date\" [color=white];\n";
     2830   print "\"$date\" [label=\"DATE\n$date\", color=white, fillcolor=black, shape=polygon, sides=14, style=filled, fontcolor=white];\n";
     2831   print "site -> \"$date\" [style=invis];\n";
    28322832
    28332833   my $b=0;
Note: See TracChangeset for help on using the changeset viewer.