io.files.trash.windows: using flags{ }.

diff --git a/extra/io/files/trash/windows/windows.factor b/extra/io/files/trash/windows/windows.factor
index 0ad9e10859e65e6f267ff81642e65d6dca7d08ad..4cecf5fa89555fead5ef51a901b63d4d2b8ece68 100644 (file)
--- a/extra/io/files/trash/windows/windows.factor
+++ b/extra/io/files/trash/windows/windows.factor
@@ -3,7 +3,7 @@
 
 USING: accessors alien.c-types alien.data alien.strings
 alien.syntax classes.struct destructors io.files.trash kernel
-libc math sequences system windows.types ;
+libc literals math sequences system windows.types ;
 
 IN: io.files.trash.windows
 
@@ -59,10 +59,12 @@ M: windows send-to-trash ( path -- )
             FO_DELETE >>wFunc
             swap >>pFrom
             f >>pTo
-            FOF_ALLOWUNDO
-            FOF_NOCONFIRMATION bitor
-            FOF_NOERRORUI bitor
-            FOF_SILENT bitor >>fFlags
+            flags{
+                FOF_ALLOWUNDO
+                FOF_NOCONFIRMATION
+                FOF_NOERRORUI
+                FOF_SILENT
+            } >>fFlags
 
         SHFileOperationW [ throw ] unless-zero