From 64231d40a6717061f6263f74d70d589a539e3b33 Mon Sep 17 00:00:00 2001
From: JT Smith <jt@lacunaexpanse.com>
Date: Sat, 24 Apr 2010 13:10:07 -0500
Subject: [PATCH] set a max length

---
 lib/Lacuna/Building/Intelligence.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lib/Lacuna/Building/Intelligence.pm b/lib/Lacuna/Building/Intelligence.pm
index 95c4543a..336ec9cc 100644
--- a/lib/Lacuna/Building/Intelligence.pm
+++ b/lib/Lacuna/Building/Intelligence.pm
@@ -150,6 +150,7 @@ sub name_spy {
     Lacuna::Verify->new(content=>\$name, throws=>[1005, 'Invalid name for a spy.'])
         ->not_empty
         ->no_profanity
+        ->length_lt(31)
         ->no_restricted_chars;
     my $empire = $self->get_empire_by_session($session_id);
     my $building = $empire->get_building($self->model_class, $building_id);
-- 
2.51.2