The R Project SVN R

Rev

Rev 44431 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 44431 Rev 44437
Line 948... Line 948...
948
static BBOX GlyphBBox(int chr, pGEcontext gc, pGEDevDesc dd)
948
static BBOX GlyphBBox(int chr, pGEcontext gc, pGEDevDesc dd)
949
{
949
{
950
    BBOX bbox;
950
    BBOX bbox;
951
    double height, depth, width;
951
    double height, depth, width;
952
    int chr1 = chr;
952
    int chr1 = chr;
953
    if(dd->dev->wantSymbolUTF8) chr1 = -Rf_AdobeSymbol2ucs2(chr);
953
    if(dd->dev->wantSymbolUTF8 && gc->fontface == 5) 
-
 
954
	chr1 = -Rf_AdobeSymbol2ucs2(chr);
954
    GEMetricInfo(chr1, gc, &height, &depth, &width, dd);
955
    GEMetricInfo(chr1, gc, &height, &depth, &width, dd);
955
    bboxHeight(bbox) = fromDeviceHeight(height, MetricUnit, dd);
956
    bboxHeight(bbox) = fromDeviceHeight(height, MetricUnit, dd);
956
    bboxDepth(bbox)  = fromDeviceHeight(depth, MetricUnit, dd);
957
    bboxDepth(bbox)  = fromDeviceHeight(depth, MetricUnit, dd);
957
    bboxWidth(bbox)  = fromDeviceHeight(width, MetricUnit, dd);
958
    bboxWidth(bbox)  = fromDeviceHeight(width, MetricUnit, dd);
958
    bboxItalic(bbox) = 0;
959
    bboxItalic(bbox) = 0;