.xbindkeysrc.scm

This commit is contained in:
Tom Willemsen 2012-02-09 09:11:43 +01:00
parent 7728389084
commit e4f69ad9fd

View file

@ -110,7 +110,7 @@
(define (gui-print text) (define (gui-print text)
(close-gui-window) (close-gui-window)
(let ((width (+ (text-width font text) 10))) (let ((width (+ (text-width dzen-font text) 10)))
(set! dzen-pipe (open-output-pipe (set! dzen-pipe (open-output-pipe
(string-append dzen-cmd " -w " (number->string width) (string-append dzen-cmd " -w " (number->string width)
" " dzen-args)))) " " dzen-args))))