From 323f4d06ed644ca0c88b0c4b36e09762052de815 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Wed, 23 Nov 2005 05:16:11 +0000
Subject: [PATCH] fix broken i18n labels in UserProfile, firstDayOfWeek

---
 docs/upgrades/upgrade_6.7.8-6.8.0.pl | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/docs/upgrades/upgrade_6.7.8-6.8.0.pl b/docs/upgrades/upgrade_6.7.8-6.8.0.pl
index 9c0709fa8..bf8e29e7c 100644
--- a/docs/upgrades/upgrade_6.7.8-6.8.0.pl
+++ b/docs/upgrades/upgrade_6.7.8-6.8.0.pl
@@ -41,6 +41,7 @@ addMatrix();
 updateConfigFile();
 addInOutBoard();
 addZipArchive();
+updateUserProfileDayLabels();
 finish();
 
 #-------------------------------------------------
@@ -971,6 +972,11 @@ sub addWorkflow {
 		)");
 }
 
+#-------------------------------------------------
+sub updateUserProfileDayLabels {
+        print "\tUpdating day labels in User Profile firstDayOfWeek.\n" unless ($quiet);
+	WebGUI::SQL->write(q!update userProfileField set dataValues='{0=>WebGUI::International::get(\"sunday\",\"DateTime\"),1=>WebGUI::International::get(\"monday\",\"DateTime\")}' where fieldName='firstDayOfWeek'!);
+}
 
 #--- DO NOT EDIT BELOW THIS LINE