blob: e424d5404c144821295680873609bf0f7edbcea8 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
%%%-------------------------------------------------------------------
%%% File : flatten.erl
%%% Author : Tobias Lindahl <[email protected]>
%%% Description :
%%%
%%% Created : 4 Nov 2007 by Tobias Lindahl <[email protected]>
%%%-------------------------------------------------------------------
-module(flatten).
-export([t/1]).
t(Dir) ->
case file:list_dir(Dir) of
{ok,FileList} ->
FileList;
{error,Reason} ->
{error,lists:flatten("Can't open directory "++Dir++": "++Reason)}
end.
|