diff options
| author | Kostis Sagonas <[email protected]> | 2011-02-05 12:57:59 +0200 |
|---|---|---|
| committer | Henrik Nord <[email protected]> | 2011-04-27 12:24:36 +0200 |
| commit | 0f03b1e9d2bef3bc830c31a369261af4c5234727 (patch) | |
| tree | a3021d689bae9e49170c0322757bdda6a4f70eba | |
| parent | bfc22545d1cdf577e8fa632f55a504a0ec3948b3 (diff) | |
| download | otp-0f03b1e9d2bef3bc830c31a369261af4c5234727.tar.gz otp-0f03b1e9d2bef3bc830c31a369261af4c5234727.tar.bz2 otp-0f03b1e9d2bef3bc830c31a369261af4c5234727.zip | |
Driver names should be strings, not atoms
| -rw-r--r-- | erts/preloaded/src/prim_file.erl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/erts/preloaded/src/prim_file.erl b/erts/preloaded/src/prim_file.erl index 3a9c670a25..fb0aef8947 100644 --- a/erts/preloaded/src/prim_file.erl +++ b/erts/preloaded/src/prim_file.erl @@ -64,7 +64,7 @@ -include("file.hrl"). -define(DRV, efile). --define(FD_DRV, efile). +-define(FD_DRV, "efile"). -define(LARGEFILESIZE, (1 bsl 63)). @@ -506,7 +506,7 @@ read_file(_) -> %% Takes a Port opened with open/1. read_file(Port, File) when is_port(Port), - (is_list(File) orelse is_binary(File))-> + (is_list(File) orelse is_binary(File)) -> Cmd = [?FILE_READ_FILE | pathname(File)], case drv_command(Port, Cmd) of {error, enomem} -> @@ -832,7 +832,7 @@ drv_open(Driver, Portopts) -> {ok, Port} catch error:Reason -> - {error,Reason} + {error, Reason} end. |