From 0e78f349fd18f5855ee06c67aca90392a7b0c279 Mon Sep 17 00:00:00 2001
From: Lukas Mueller <lam87@cornell.edu>
Date: Fri, 29 Mar 2013 07:41:32 -0400
Subject: [PATCH] move accessor for organization to Login object.

---
 lib/CXGN/People/Login.pm  | 15 +++++++++++++++
 lib/CXGN/People/Person.pm |  4 ----
 2 files changed, 15 insertions(+), 4 deletions(-)

diff --git a/lib/CXGN/People/Login.pm b/lib/CXGN/People/Login.pm
index f190b2d..2996601 100644
--- a/lib/CXGN/People/Login.pm
+++ b/lib/CXGN/People/Login.pm
@@ -332,6 +332,21 @@ sub get_disabled {
     return $self->{disabled};
 }
 
+=head2 accessors get_organization(), set_organization()
+
+=cut
+
+sub get_organization {
+    my $self = shift;
+    return $self->{organization};
+}
+
+sub set_organization {
+    my $self = shift;
+    $self->{organization} = shift;
+}
+
+
 =head2 new_role
 
  Usage:        $p->new_role($role)
diff --git a/lib/CXGN/People/Person.pm b/lib/CXGN/People/Person.pm
index 5a7d7ad..0017f24 100644
--- a/lib/CXGN/People/Person.pm
+++ b/lib/CXGN/People/Person.pm
@@ -619,10 +619,6 @@ sub set_first_name {
     $self->{first_name} = shift;
 }
 
-sub set_organization {
-    my $self = shift;
-    $self->{organization} = shift;
-}
 
 sub set_address {
     my $self = shift;
-- 
2.11.4.GIT