Skip to content

Commit fd4ee05

Browse files
committed
fix erroneous conversion to monochrome bitmaps
1 parent 4bc58d7 commit fd4ee05

File tree

2 files changed

+2
-4
lines changed

2 files changed

+2
-4
lines changed

plot-lib/plot/private/no-gui/plot2d.rkt

Lines changed: 1 addition & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -98,8 +98,7 @@
9898
#:y-label [y-label (plot-y-label)]
9999
#:legend-anchor [legend-anchor (plot-legend-anchor)])
100100
(define bm : (Instance (Class #:implements Bitmap% #:implements Plot-Metrics<%>))
101-
(make-object (plot-metrics-mixin bitmap%)
102-
(λ () pm) width height #t 1.0))
101+
(make-object (plot-metrics-mixin bitmap%) (λ () pm) width height))
103102
(define dc : (Instance DC<%>) (make-object bitmap-dc% bm))
104103
(define pm : (Instance Plot-Metrics<%>)
105104
(plot/dc renderer-tree dc 0 0 width height

plot-lib/plot/private/no-gui/plot3d.rkt

Lines changed: 1 addition & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -129,8 +129,7 @@
129129
#:z-label [z-label (plot-z-label)]
130130
#:legend-anchor [legend-anchor (plot-legend-anchor)])
131131
(define bm : (Instance (Class #:implements Bitmap% #:implements Plot-Metrics<%>))
132-
(make-object (plot-metrics-mixin (class bitmap% (super-new)))
133-
(λ () pm) width height #t 1.0))
132+
(make-object (plot-metrics-mixin (class bitmap% (super-new))) (λ () pm) width height))
134133
(define dc : (Instance DC<%>) (make-object bitmap-dc% bm))
135134
(define pm : (Instance Plot-Metrics<%>)
136135
(plot3d/dc renderer-tree dc 0 0 width height

0 commit comments

Comments
 (0)