From 12a721869ca8da848cdc2199f049a72bac59d510 Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Sun, 19 Oct 2008 16:33:09 -0500
Subject: [PATCH] directory usage

---
 extra/ftp/ftp.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/extra/ftp/ftp.factor b/extra/ftp/ftp.factor
index b2b5ebc9aa..1fd97df6d5 100644
--- a/extra/ftp/ftp.factor
+++ b/extra/ftp/ftp.factor
@@ -59,5 +59,5 @@ TUPLE: ftp-response n strings parsed ;
     3array " " join ;
 
 : directory-list ( -- seq )
-    "" directory keys
+    "" directory-files
     [ [ link-info ] keep file-info>string ] map ;