From 874b3eb01ebdbc78a8d1e652dd355a941c0283d5 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Wed, 27 Jan 2010 17:25:46 +0000
Subject: (iso8601_date_to_locale) share it

---
 mdkapplet_gui.pm | 14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

(limited to 'mdkapplet_gui.pm')

diff --git a/mdkapplet_gui.pm b/mdkapplet_gui.pm
index 9509e969..cc416977 100644
--- a/mdkapplet_gui.pm
+++ b/mdkapplet_gui.pm
@@ -25,7 +25,7 @@ package mdkapplet_gui;
 use strict;
 use lib qw(/usr/lib/libDrakX);
 use common;
-
+use DateTime;
 
 our @ISA = qw(Exporter);
 our @EXPORT = qw(
@@ -35,6 +35,7 @@ our @EXPORT = qw(
                     $localfile
                     $width
                     fill_n_run_portable_dialog
+                    iso8601_date_to_locale
                     new_link_button
                     new_portable_dialog
                     setVar
@@ -122,3 +123,14 @@ sub setVar {
     setVarsInSh($localfile, \%s);
     read_local_config();
 }
+
+sub iso8601_date_to_locale {
+    my ($date) = @_;
+    return $date if $date !~ /(\d\d\d\d)-?(\d\d)-?(\d\d)/;
+    my $dt = DateTime->new(year => $1, month => $2, day => $3);
+    my $date1 = $dt->strftime("%x");
+    # will fail on some locales (eg: br_FR, ...):
+    eval { $dt->set_locale($ENV{LC_TIME}) };
+    my $date2 = $dt->strftime("%x");
+    $date2 || $date1;
+}
-- 
cgit v1.2.1