Skip to content
Snippets Groups Projects
Commit 691ae348 authored by Andreas Fuchs's avatar Andreas Fuchs
Browse files

Remove a debugging format statement that I left in accidentally.

parent 4d2f43a9
No related branches found
No related tags found
No related merge requests found
...@@ -76,8 +76,6 @@ ...@@ -76,8 +76,6 @@
((:device :pixel) ((:device :pixel)
(make-bounding-rectangle (make-bounding-rectangle
screen-left screen-top screen-right screen-bottom)))) screen-left screen-top screen-right screen-bottom))))
(format *trace-output* "~&height: ~A vs. real height: ~A~%"
screen-height (- screen-bottom screen-top))
(setf (sheet-native-transformation graft) +identity-transformation+) (setf (sheet-native-transformation graft) +identity-transformation+)
(setf (sheet-direct-mirror graft) screen) (setf (sheet-direct-mirror graft) screen)
(update-mirror-transformation port graft))))))) (update-mirror-transformation port graft)))))))
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment