From 1f656c7344cd7f30b4eacb2ed06e1952504e01be Mon Sep 17 00:00:00 2001
From: Dave Cross <davidc@broadbean.com>
Date: Tue, 15 Sep 2015 15:21:41 +0100
Subject: [PATCH] Add useful is_registered and is_verified methods to student.

---
 Kinza/lib/Kinza/Schema/Result/Student.pm | 12 ++++++++++++
 Kinza/views/years.tt                     |  4 ++--
 2 files changed, 14 insertions(+), 2 deletions(-)

diff --git a/Kinza/lib/Kinza/Schema/Result/Student.pm b/Kinza/lib/Kinza/Schema/Result/Student.pm
index bcd2624..42293ca 100644
--- a/Kinza/lib/Kinza/Schema/Result/Student.pm
+++ b/Kinza/lib/Kinza/Schema/Result/Student.pm
@@ -194,6 +194,18 @@ sub allowed_courses {
   return $self->form->year->allowed_courses;
 }
 
+sub is_registered {
+  my $self = shift;
+
+  return length $self->password;
+}
+
+sub is_verified {
+  my $self = shift;
+
+  return $self->is_registered && ! $self->verify;
+}
+
 # You can replace this text with custom code or comments, and it will be preserved on regeneration
 __PACKAGE__->meta->make_immutable;
 1;
diff --git a/Kinza/views/years.tt b/Kinza/views/years.tt
index 6048d79..aac01af 100644
--- a/Kinza/views/years.tt
+++ b/Kinza/views/years.tt
@@ -15,8 +15,8 @@ END -%]
 <tr><th>Name</th><th>Email</th><th>Registered</th><th>Verified</th><th>Selected</th></td>
 [%     FOREACH student IN form.students.sort('name') -%]
 <tr><td>[% student.name %]</td><td>[% student.email %]</td>
-<td>[% ok(student.password) %]</td>
-<td>[% ok(student.password AND NOT student.verify) %]</td>
+<td>[% ok(student.is_registered) %]</td>
+<td>[% ok(student.is_verified) %]</td>
 <td>[% ok(student.locked) %]</td></tr>
 [%     END -%]
 [%   END -%]