From 776dc9c9fa8fc8cce924dddd9b767b17cf9d65c7 Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Sun, 16 Oct 2011 23:05:38 -0700
Subject: [PATCH] Fix typo in tools.deploy.windows.ico

---
 basis/tools/deploy/windows/ico/ico.factor | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/basis/tools/deploy/windows/ico/ico.factor b/basis/tools/deploy/windows/ico/ico.factor
index 6f4b1d5b34..4827cc2e05 100755
--- a/basis/tools/deploy/windows/ico/ico.factor
+++ b/basis/tools/deploy/windows/ico/ico.factor
@@ -1,6 +1,6 @@
 USING: accessors alien alien.c-types arrays classes.struct combinators
 io.backend kernel locals math sequences specialized-arrays
-tools.deploy.windows windows.kernel32 windows.types ;
+tools.deploy.windows windows.kernel32 windows.types alien.data ;
 IN: tools.deploy.windows.ico
 
 <PRIVATE
@@ -44,7 +44,7 @@ STRUCT: group-directory-entry
     bytes ico-header memory>struct :> header
 
     ico-header heap-size bytes <displaced-alien>
-    header ImageCount>> ioc-directory-entry <c-direct-array> :> directory
+    header ImageCount>> ico-directory-entry <c-direct-array> :> directory
 
     directory dup length iota [ ico>group-directory-entry ] { } 2map-as
         :> group-directory