diff --git a/.xbindkeysrc.scm b/.xbindkeysrc.scm
index 651479d..9e17422 100644
--- a/.xbindkeysrc.scm
+++ b/.xbindkeysrc.scm
@@ -110,7 +110,7 @@
 
 (define (gui-print text)
   (close-gui-window)
-  (let ((width (+ (text-width font text) 10)))
+  (let ((width (+ (text-width dzen-font text) 10)))
     (set! dzen-pipe (open-output-pipe
                      (string-append dzen-cmd " -w " (number->string width)
                                     " " dzen-args))))