Revert "Replace "win32-error-string throw" with windows-error instance throwing"

[factor.git] / basis / alien / libraries / windows / windows.factor

diff --git a/basis/alien/libraries/windows/windows.factor b/basis/alien/libraries/windows/windows.factor
index 03a2e8b8d4825814e6a64376b396db2741fcc965..249bcff57a4622aae92cf0db7e412e90bc53790b 100644 (file)
--- a/basis/alien/libraries/windows/windows.factor
+++ b/basis/alien/libraries/windows/windows.factor
@@ -1,9 +1,8 @@
-USING: alien.libraries io.pathnames system windows.errors
-windows.kernel32 ;
+USING: alien.libraries io.pathnames system windows.errors ;
 IN: alien.libraries.windows
 
 M: windows >deployed-library-path
     file-name ;
 
 M: windows dlerror ( -- message )
-    GetLastError n>win32-error-string ;
+    win32-error-string ;