CVS Update: gleipnir

[Dan Brosemer <odin@cleannorth.org>]

Log Message:
-----------
Sort

Modified Files:
--------------
    gleipnir/public_html/webmail:
        addressbook.pl

Revision Data
-------------
Index: addressbook.pl
===================================================================
RCS file: /cvs/gleipnir/public_html/webmail/addressbook.pl,v
retrieving revision 1.4
retrieving revision 1.5
diff -Lpublic_html/webmail/addressbook.pl -Lpublic_html/webmail/addressbook.pl -u -r1.4 -r1.5
--- public_html/webmail/addressbook.pl
+++ public_html/webmail/addressbook.pl
@@ -65,9 +65,9 @@
 		my $gleipnir    = $options{-gleipnir};
 		my $cgi         = $gleipnir->cgi;
 
-		my $address = $gleipnir->rpc('addressbook_list');
+		my @address = sort { ($a->{last}.','.$a->{first}) cmp ($b->{last}.','.$b->{first}) } @{$gleipnir->rpc('addressbook_list')};
 		my $template = $gleipnir->template('webmail/abookedit');
-		$template->param(addressbook => $address);
+		$template->param(addressbook => \@address);
 
 		return $gleipnir->body($template->output);
 	};