From f21b72789018cf5ac581d851685162194b049d11 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Bj=C3=B6rn-Egil=20Dahlberg?= <egil@erlang.org>
Date: Wed, 30 Nov 2011 19:08:38 +0100
Subject: stdlib: Fix return file_info on epoch

---
 lib/kernel/src/file.erl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib')

diff --git a/lib/kernel/src/file.erl b/lib/kernel/src/file.erl
index 8f027f5a40..dafd2c6909 100644
--- a/lib/kernel/src/file.erl
+++ b/lib/kernel/src/file.erl
@@ -1335,7 +1335,7 @@ fname_join(Dir, Name) ->
 %% all times from prime_file (and file_server) are in unix epochs
 
 %% from_epochs
-file_info_time(epoch, {ok, FI}) -> FI;
+file_info_time(epoch, {ok, FI} = R) -> R;
 file_info_time(local, {ok, #file_info{ atime = Atime, ctime = Ctime, mtime = Mtime } = FI}) ->
     {ok, FI#file_info{
 	    atime = time_epochs_to_local(Atime),
-- 
cgit v1.2.3