Home | History | Annotate | Download | only in galaxy

Lines Matching defs:Box

5 # others around it.  Each one gets a box about its area.
42 # Draw box with file name
43 my @Output = Box ('normal', 'Helvetica-Bold', 32, $CFile, $LastLine);
48 #add a duplicate box to test if this works
65 # Box (type, font, fontsize, Label, BBoxLine)
66 sub Box
75 # print (STDERR "Box ('$Type', '$Font', '$Fontsize', '$Label', '$BBoxLine')\n");
76 push (@Output, "% start of box\n");
87 # Put black box around it
95 # fill bounding box
96 push (@Output, "% end of box\n");
98 # Output bounding box
131 # Draw dashed box with function name
136 push (@Output, Box ('dashed', 'Helvetica', 24, $FuncName, $LastLine));