[interchange-cvs] interchange - racke modified dist/lib/UI/usertag/file_info.tag

interchange-core@interchange.redhat.com interchange-core@interchange.redhat.com
Sat Nov 17 11:36:01 2001


User:      racke
Date:      2001-11-17 16:35:10 GMT
Modified:  dist/lib/UI/usertag Tag: STABLE_4_8-branch file_info.tag
Log:
consider current locale

Revision  Changes    Path
No                   revision



No                   revision



2.0.2.1   +2 -12     interchange/dist/lib/UI/usertag/file_info.tag


rev 2.0.2.1, prev_rev 2.0
Index: file_info.tag
===================================================================
RCS file: /anon_cvs/repository/interchange/dist/lib/UI/usertag/file_info.tag,v
retrieving revision 2.0
retrieving revision 2.0.2.1
diff -u -r2.0 -r2.0.2.1
--- file_info.tag	2001/07/18 02:22:15	2.0
+++ file_info.tag	2001/11/17 16:35:10	2.0.2.1
@@ -37,22 +37,12 @@
 		return $stat[9];
 	}
 	if($opt->{date}) {
-		if($opt->{gmt}) {
-			return POSIX::strftime('%c', gmtime($stat[9]));
-		}
-		else {
-			return POSIX::strftime('%c', localtime($stat[9]));
-		}
+		return $Tag->time($Scratch->{mv_locale},{time => $stat[9], gmt => $opt->{gmt}},'%c');
 	}
 	$opt->{fmt} = '%f bytes, last modified %Y-%m-%d %H:%M:%S'
 		if ! $opt->{fmt};
 	$opt->{fmt} =~ s/%f/$size/g;
-	if($opt->{gmt}) {
-		return POSIX::strftime($opt->{fmt}, gmtime($stat[9]));
-	}
-	else {
-		return POSIX::strftime($opt->{fmt}, localtime($stat[9]));
-	}
+    $Tag->time($Scratch->{mv_locale},{time => $stat[9], gmt => $opt->{gmt}},$opt->{fmt});
 }
 EOR