ui.backend.x11: search path for xmessage rather than hardcoding path
parent
e5c65b2204
commit
859ec88bcd
|
@ -332,7 +332,7 @@ M: x11-ui-backend beep ( -- )
|
||||||
[ dup CHAR: ' = [ drop "'\\''" ] [ 1string ] if ] { } map-as concat ;
|
[ dup CHAR: ' = [ drop "'\\''" ] [ 1string ] if ] { } map-as concat ;
|
||||||
|
|
||||||
: xmessage ( string -- )
|
: xmessage ( string -- )
|
||||||
escape-' "/usr/X11R6/bin/xmessage '" "'" surround system drop ;
|
escape-' "/usr/bin/env xmessage '" "'" surround system drop ;
|
||||||
PRIVATE>
|
PRIVATE>
|
||||||
|
|
||||||
M: x11-ui-backend system-alert
|
M: x11-ui-backend system-alert
|
||||||
|
|
Loading…
Reference in New Issue