[phpBT-dev] CVS: phpbt bug.php,1.40,1.41

[Benjamin C. <bc...@us...>]

Update of /cvsroot/phpbt/phpbt
In directory usw-pr-cvs1:/tmp/cvs-serv19569

Modified Files:
	bug.php 
Log Message:
Restrict the project list for entering a bug to those with components

Index: bug.php
===================================================================
RCS file: /cvsroot/phpbt/phpbt/bug.php,v
retrieving revision 1.40
retrieving revision 1.41
diff -u -r1.40 -r1.41
--- bug.php	2001/09/08 15:59:53	1.40
+++ bug.php	2001/09/11 13:02:51	1.41
@@ -507,7 +507,10 @@
 function show_projects() {
 	global $me, $q, $t, $project, $STRING;
 	
-	$q->query('select * from '.TBL_PROJECT.' where active order by project_name');
+	// Show only active projects with at least one component
+	$q->query('select * from '.TBL_PROJECT.' p, '.TBL_COMPONENT
+		.' c where p.active and p.project_id = c.project_id group by p.project_id 
+		order by project_name');
 	switch ($q->num_rows()) {
 		case 0 :
 			$t->set_var('rows',$STRING['noprojects']);