]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/x11/x11.factor
factor: fix some spacing
[factor.git] / basis / x11 / x11.factor
index fc749012ab2ee2507929ad083999057cf0505349..4340fa1a7a5ee9608d7f1368393a4d0584e13373 100644 (file)
@@ -10,8 +10,8 @@ SYMBOL: scr
 SYMBOL: root
 
 : init-locale ( -- )
-   LC_ALL "" setlocale [ "setlocale() failed" print flush ] unless
-   XSupportsLocale c-bool> [ "XSupportsLocale() failed" print flush ] unless ;
+    LC_ALL "" setlocale [ "setlocale() failed" print flush ] unless
+    XSupportsLocale c-bool> [ "XSupportsLocale() failed" print flush ] unless ;
 
 : flush-dpy ( -- ) dpy get XFlush drop ;