[Rt-commit] r13386 - rt/3.8/trunk/lib/RT/Graph

[ruz at bestpractical.com]

Author: ruz
Date: Wed Jun 18 12:04:32 2008
New Revision: 13386

Modified:
   rt/3.8/trunk/lib/RT/Graph/Tickets.pm

Log:
* always position fields in a grpah's node from top to bottom
  even if overall grpah's layout is left to right.

Modified: rt/3.8/trunk/lib/RT/Graph/Tickets.pm
==============================================================================
--- rt/3.8/trunk/lib/RT/Graph/Tickets.pm	(original)
+++ rt/3.8/trunk/lib/RT/Graph/Tickets.pm	Wed Jun 18 12:04:32 2008
@@ -233,7 +233,9 @@
     my @fields = $self->_PropertiesToFields( %args );
     if ( @fields ) {
         unshift @fields, $args{'Ticket'}->id;
-        $node_style{'label'} = gv_escape( '{ '. join( ' | ', map { s/(?=[{}|])/\\/g; $_ }  @fields ) .' }' );
+        my $label = join ' | ', map { s/(?=[{}|])/\\/g; $_ } @fields;
+        $label = "{ $label }" if ($args{'Direction'} || 'TB') =~ /^(?:TB|BT)$/;
+        $node_style{'label'} = gv_escape( $label );
         $node_style{'shape'} = 'record';
     }