From c226b94ce28d3bf1eddb32bd0a4b134feeb4166b Mon Sep 17 00:00:00 2001
From: Graham Knop <graham@plainblack.com>
Date: Thu, 2 Aug 2007 21:25:21 +0000
Subject: [PATCH] increase size of group names

---
 docs/changelog/7.x.x.txt             | 3 +++
 docs/upgrades/upgrade_7.4.1-7.4.2.pl | 7 ++++++-
 2 files changed, 9 insertions(+), 1 deletion(-)

diff --git a/docs/changelog/7.x.x.txt b/docs/changelog/7.x.x.txt
index 9a4cf9399..f77f03290 100644
--- a/docs/changelog/7.x.x.txt
+++ b/docs/changelog/7.x.x.txt
@@ -1,3 +1,6 @@
+7.4.2
+ - Group names can now be 100 characters long
+
 7.4.1
  - fix: crons wouldn't load into spectre's queue at startup.
  - fix: in the Collaboration System, posts from the Safari browser
diff --git a/docs/upgrades/upgrade_7.4.1-7.4.2.pl b/docs/upgrades/upgrade_7.4.1-7.4.2.pl
index 48f7b9cb7..6c6e78661 100644
--- a/docs/upgrades/upgrade_7.4.1-7.4.2.pl
+++ b/docs/upgrades/upgrade_7.4.1-7.4.2.pl
@@ -21,6 +21,7 @@ my $quiet; # this line required
 my $session = start(); # this line required
 
 # upgrade functions go here
+increaseGroupNameSize($session);
 
 finish($session); # this line required
 
@@ -121,5 +122,9 @@ sub createNewTemplatesFolder {
 	return $newFolder;
 }
 
-
+sub increaseGroupNameSize {
+    my $session = shift;
+    print "\tIncreasing size of group name field.\n" unless $quiet;
+    $session->db->write("alter table groups modify groupName varchar(100)");
+}