factor: trim using lists

[factor.git] / extra / time / windows / windows.factor

diff --git a/extra/time/windows/windows.factor b/extra/time/windows/windows.factor
index 95fc9706e1c741cf4de5001e03145b6e1fe87ac9..7bfbbfc5f24582b834b83646d899d7cf52d6e18f 100644 (file)
--- a/extra/time/windows/windows.factor
+++ b/extra/time/windows/windows.factor
@@ -1,9 +1,8 @@
 ! Copyright (C) 2010 Doug Coleman.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: calendar.windows system time windows.errors
-windows.kernel32 kernel classes.struct calendar ;
+USING: calendar calendar.windows system time windows.errors
+windows.kernel32 ;
 IN: time.windows
 
-M: windows set-time
-    >gmt
-    timestamp>SYSTEMTIME SetSystemTime win32-error=0/f ;
+M: windows set-system-time
+    >gmt timestamp>SYSTEMTIME SetSystemTime win32-error=0/f ;