Show birthdays in menu

[ndwebbie.git] / lib / NDWeb / Controller / Root.pm

diff --git a/lib/NDWeb/Controller/Root.pm b/lib/NDWeb/Controller/Root.pm
index 682448cee4365eb59f578c067dc7bfe665f81afd..a1eac62c9f76b8cf7bd932a97dd14a4ba56d4c83 100644 (file)
--- a/lib/NDWeb/Controller/Root.pm
+++ b/lib/NDWeb/Controller/Root.pm
@@ -198,6 +198,15 @@ sub end : ActionClass('RenderView') {
                                        || $c->check_user_roles(qw/no_fleet_update/)))),
                $c->forward('listTargets');
        }
+       if ($c->res->status == 200){
+               my $birthdays = $dbh->prepare(q{SELECT username
+                       ,date_part('year',age(birthday)) AS age
+                       FROM users WHERE birthday IS NOT NULL
+                               AND mmdd(birthday) = mmdd(CURRENT_DATE)
+               });
+               $birthdays->execute;
+               $c->stash(birthdays => $birthdays->fetchall_arrayref({}));
+       }
 }
 
 =head1 AUTHOR