===================================================================
RCS file: /cvs/cvsweb/cvsweb.cgi,v
retrieving revision 1.21
retrieving revision 1.23
diff -u -p -r1.21 -r1.23
--- cvsweb/cvsweb.cgi	1998/07/23 09:42:40	1.21
+++ cvsweb/cvsweb.cgi	1998/08/15 09:59:11	1.23
@@ -28,7 +28,7 @@
 # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 # SUCH DAMAGE.
 #
-# $fId$
+# $fId: cvsweb.cgi,v 1.22 1998/08/13 10:35:26 wosch Exp $
 #
 
 
@@ -144,7 +144,7 @@ if (!-d $cvsroot) {
 {
     local(@foo, $i);
     local($scriptname) = $ENV{'SCRIPT_NAME'};
-    foreach (keys %CVSROOT) {
+    foreach (sort keys %CVSROOT) {
 	if (-d $CVSROOT{$_}) {
 	    push(@foo, $_);
 	}
@@ -173,8 +173,9 @@ if (-d $fullname) {
 	    print $shortinstr;
 	}
 	print "<p>";
-	print "Current CVS tree: <b>$cvstree</b><br>\n"
-	    if $cvstree ne $cvstreedefault;
+	print "Current CVS tree: <b>",
+		($CVSROOTdescr{"$cvstree"} ? $CVSROOTdescr{"$cvstree"} :
+			$cvstree), "</b><br>\n";
 	print "Current directory: <b>/$where</b>\n";
 	print "<P><HR NOSHADE>\n";
 	# Using <MENU> in this manner violates the HTML2.0 spec but