[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