/[eiffelstudio]/branches/Eiffel_57_docking/Src/Eiffel/interface/new_graphical/commands/eb_fill_cluster_command.e
ViewVC logotype

Diff of /branches/Eiffel_57_docking/Src/Eiffel/interface/new_graphical/commands/eb_fill_cluster_command.e

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

revision 62170 by manus, Sun Jul 30 06:13:25 2006 UTC revision 62171 by larryl, Tue Aug 1 01:27:17 2006 UTC
# Line 103  feature {NONE} -- Implementation Line 103  feature {NONE} -- Implementation
103                          if not tool.cluster_graph.last_included_classes.is_empty then                          if not tool.cluster_graph.last_included_classes.is_empty then
104                                  a_cluster_fig.reset_user_size                                  a_cluster_fig.reset_user_size
105                                  tool.world.update                                  tool.world.update
106                                  tool.layout.set_spacing ({EB_CONTEXT_EDITOR}.default_bon_horizontal_spacing, {EB_CONTEXT_EDITOR}.default_bon_vertical_spacing)                                  tool.layout.set_spacing ({EB_DIAGRAM_TOOL}.default_bon_horizontal_spacing, {EB_DIAGRAM_TOOL}.default_bon_vertical_spacing)
107                                  tool.layout.layout_cluster_only (a_cluster_fig)                                  tool.layout.layout_cluster_only (a_cluster_fig)
108    
109                                  a_cluster_fig.set_port_position (port_x, port_y)                                  a_cluster_fig.set_port_position (port_x, port_y)
# Line 120  feature {NONE} -- Implementation Line 120  feature {NONE} -- Implementation
120                          Result := pixmaps.icon_pixmaps.diagram_fill_cluster_icon                          Result := pixmaps.icon_pixmaps.diagram_fill_cluster_icon
121                  end                  end
122    
123            pixel_buffer: EV_PIXEL_BUFFER is
124                            -- Pixel buffer representing the command.
125                    do
126                            -- Currently there is no pixel buffer for this command.
127                    end
128    
129          tooltip: STRING is          tooltip: STRING is
130                          -- Tooltip for the toolbar button.                          -- Tooltip for the toolbar button.
131                  do                  do

Legend:
Removed from v.62170  
changed lines
  Added in v.62171

  ViewVC Help
Powered by ViewVC 1.1.23