gtk/fix-layout.scm (set-fix-drawing-size!): typo

diff --git a/src/gtk/fix-layout.scm b/src/gtk/fix-layout.scm
index c74ab3b424baf8929a9cd673aa7b8aee0fc996c7..9f75d7f6a3b09d2382516697768b34c0d6095e46 100644 (file)
--- a/src/gtk/fix-layout.scm
+++ b/src/gtk/fix-layout.scm
@@ -806,8 +806,8 @@ Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA.
 
 (define (set-fix-drawing-size! drawing width height)
   (guarantee-fix-drawing drawing 'set-fix-drawing-size!)
-  (guarantee-size width 'set-drawing-size!)
-  (guarantee-size height 'set-drawing-size!)
+  (guarantee-size width 'set-fix-drawing-size!)
+  (guarantee-size height 'set-fix-drawing-size!)
   (set-fix-rect-size! (fix-drawing-extent drawing) width height)
   (for-each
     (lambda (widget) (set-fix-layout-scroll-size! widget width height))