From b54e2e55ebabfd442b239efe342a0e1160636a96 Mon Sep 17 00:00:00 2001
From: hdl <hdl>
Date: Thu, 24 Feb 2005 14:13:16 +0000
Subject: [PATCH] tidying lists forms

---
 reports/borrowers_stats.pl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/reports/borrowers_stats.pl b/reports/borrowers_stats.pl
index 797209c519..326a4c7d79 100755
--- a/reports/borrowers_stats.pl
+++ b/reports/borrowers_stats.pl
@@ -102,7 +102,7 @@ if ($do_it) {
 	my @values;
 	my %labels;
 	my $req;
-	$req = $dbh->prepare( "select categorycode, description from categories");
+	$req = $dbh->prepare( "select categorycode, description from categories order by description");
 	$req->execute;
 	my %select_catcode;
 	my @select_catcode;
@@ -119,7 +119,7 @@ if ($do_it) {
 				-size     => 1,
 				-multiple => 0 );
 	
-	$req = $dbh->prepare( "select distinctrow sort1 from borrowers");
+	$req = $dbh->prepare( "select distinctrow sort1 from borrowers order by sort1");
 	$req->execute;
 	my @select_sort1;
 	push @select_sort1,"";
@@ -136,7 +136,7 @@ if ($do_it) {
 				-size     => 1,
 				-multiple => 0 );
 	
-	$req = $dbh->prepare( "select distinctrow sort2 from borrowers");
+	$req = $dbh->prepare( "select distinctrow sort2 from borrowers order by sort2");
 	$req->execute;
 	my @select_sort2;
 	push @select_sort2,"";
-- 
2.39.5