fix small bug in x11 beep

db4
Joe Groff 2008-06-11 19:22:35 -07:00
parent 7b522ee407
commit 1cb9f2342e
1 changed files with 1 additions and 1 deletions
extra/ui/x11

View File

@ -258,7 +258,7 @@ M: x11-ui-backend ui ( -- )
] ui-running ;
M: x11-ui-backend beep ( -- )
dpy 100 XBell drop ;
dpy get 100 XBell drop ;
x11-ui-backend ui-backend set-global