From 7b421526726d92b9d8b1214dfe3d857ffc2419ed Mon Sep 17 00:00:00 2001
From: Jeff Teunissen <deek@d2dc.net>
Date: Sat, 28 Oct 2000 13:00:55 +0000
Subject: [PATCH] Add lists page, link it to the menu, and add searches for all
 lists.

---
 lists.php      |  59 +++++++++++++++++++++++
 parts/menu.php |   8 ++--
 search.php     | 126 ++++++++++++++++++++++++++-----------------------
 3 files changed, 131 insertions(+), 62 deletions(-)
 create mode 100644 lists.php

diff --git a/lists.php b/lists.php
new file mode 100644
index 0000000..4f06505
--- /dev/null
+++ b/lists.php
@@ -0,0 +1,59 @@
+<?	// Preamble
+	$pageName = "Mailing Lists";
+	$focused = "none";					// Dock icon name to gets a border
+	require "parts/preamble.php";		// Load most of document
+?>
+<!--SEARCHME-->
+<?
+	function mailListLinks ($listName)
+	{
+		$infoUrl = 'http://lists.sourceforge.net/mailman/listinfo/';
+		$archiveUrl = 'http://lists.sourceforge.net/pipermail/';
+		
+		echo '[ ';
+		echo '<A href="' . $infoUrl . $listName . '/">info</A>';
+		echo ' | ';
+		echo '<A href="' . $archiveUrl . $listName . '/">archives</A>';
+		echo ' ]';
+	}
+?>
+
+The QuakeForge Project has several email lists, which we use to keep in touch
+with each other and the community. This page is a list of them.
+
+<H4>QuakeForge Announcements <? mailListLinks ('quake-announce'); ?></H4>
+
+<P>From time to time, the QuakeForge team make announcements. This, along with
+the development list, is where they are sent. If you want to know about them,
+subscribe here.
+
+<H4>QuakeForge Bugs <? mailListLinks ('quake-bugs'); ?></H4>
+
+<P>We hate to admit it, but even our code sometimes has bugs in it. This mailing
+list is for discussing those bugs. Also, the QuakeForge bug-tracking system
+sends mail to this list whenever the bug database is updated.
+
+<H4>QuakeForge CVS Updates <? mailListLinks ('quake-cvs'); ?></H4>
+
+<P>If you would like to get an email every time something happens in the
+QuakeForge CVS, subscribe to this mailing list. Because a mail is sent out
+every time any file is changed, this list tends to be pretty high-traffic. Each
+email contains a list of files changed, and what was changed.
+
+<H4>QuakeForge Development <? mailListLinks ('quake-devel'); ?></H4>
+
+<P>This is where the main development work is discussed. Tempers run high
+occasionally, and technical discussion is the order of the day. If you are
+interested in helping, have a patch, or are concerned with the direction the
+development is taking, this is the place you want to be.
+
+<H4>QuakeForge User Discussion <? mailListLinks ('quake-user'); ?></H4>
+
+<P>If you are more interested in playing the game than talking about development
+stuff, you want to be here. Many of the QuakeForge developers are here, and
+aside from our IRC channel, this is the closest thing to a tech support hotline
+that we have. There may also be discussion between players here.
+<!--NOSEARCH-->
+<?
+	require "parts/postamble.php";		// Finish this sucker up
+?>
diff --git a/parts/menu.php b/parts/menu.php
index 2313175..5b0b731 100644
--- a/parts/menu.php
+++ b/parts/menu.php
@@ -34,7 +34,7 @@
 		menuItemLink ("/screenshots.php", "Screenshots");
 		menuItemLink ("/files.php", "Downloads");
 		menuItemLink ("http://sourceforge.net/bugs/?group_id=882", "Bug Reports");
-		menuItemLink ("http://sourceforge.net/mail/?group_id=882", "Mailing Lists");
+		menuItemLink ("/lists.php", "Mailing Lists");
 //		menuItemLink ("/board/", "Web Forum");
 		menuSectionFooter ();
 	}
@@ -76,9 +76,11 @@
 				'		<OPTION value="news">News</OPTION>' .
 //				'		<OPTION value="site">Site</OPTION>' .
 //				'		<OPTION value="bugs">Bug Tracking</OPTION>' .
+				'		<OPTION value="-announce">Announcements</OPTION>' .
+				'		<OPTION value="-bugs">Bug Discussions</OPTION>' .
 				'		<OPTION value="-cvs">CVS Logs</OPTION>' .
-				'		<OPTION value="-devel">Developer Mail List</OPTION>' .
-				'		<OPTION value="-users">Users Mail List</OPTION>' .
+				'		<OPTION value="-devel">Developer Talk</OPTION>' .
+				'		<OPTION value="-user">User Discussions</OPTION>' .
 //				'		<OPTION value="patches">Patches</OPTION>' .
 				'	</SELECT>' .
 				'	<BR>' .
diff --git a/search.php b/search.php
index c7527ec..ffa9b39 100644
--- a/search.php
+++ b/search.php
@@ -1,59 +1,67 @@
-<?
-	switch ($type_of_search) {
-		case "news":
-			$string = AddSlashes ($words);
-			include "old_news.php";
-			break;
-		case "-cvs":
-			$string = urlencode ($words);
-			header ("Location: http://www.geocrawler.com/search/?config=899&words=$string");
-			break;
-		case "-devel":
-			$string = urlencode ($words);
-			header ("Location: http://www.geocrawler.com/search/?config=856&words=$string");
-			break;
-		case "-user":
-			$string = urlencode ($words);
-			header ("Location: http://www.geocrawler.com/search/?config=898&words=$string");
-			break;
-		case "site":		
-			$pageName = "Search Results";
-			$focused = "none";				// Dock icon name to get a border
-			include "parts/preamble.php";	// Load most of document
-
-			// Start actual search
-			$lib = dblist ();
-			$dbm = dbmopen ("siteindex.db","r");
-			if (dbmexists ($dbm, $string)) {
-				$parseMe = dbmfetch($dbm, $string);
-			}
-			dbmclose ($dbm);
-			if ($parseMe) {
-				echo $parseMe;
-				$filenames = preg_split("/&&/", $parseMe);
-				for ($i = 0;$i < sizeof($filenames);$i++) {
-					$temp = $filenames[$i];
-					if ($files[$temp]) {
-						$files[$temp]++;
-					} else {
-						$files[$temp] = 0;
-					}
-				}
-				while (list($key,$val) = each ($files)) {
-					echo "<P><A HREF=\"$key\">$key</A> - $val hits";
-				}		
-			} else {
-				echo "<P>Sorry, no pages found containing '$words'";
-			}
-			include "parts/postamble.php";	// Finish this sucker up
-			break;
-		default:
-			$pageName = "Search Results";
-			$focused = "none";					// Dock icon name to gets a border
-			include "parts/preamble.php";		// Load most of document
-			
-			?><P>That type of search isn't supported yet.  Please check back later.<?
-			include "parts/postamble.php"; 	// Finish this sucker up
-			break;
-	}
-?>
+<?
+	switch ($type_of_search) {
+		case "news":
+			$string = AddSlashes ($words);
+			include "old_news.php";
+			break;
+		case "-announce":
+			$string = urlencode ($words);
+			header ("Location: http://www.geocrawler.com/search/?config=3792&words=$string");
+			break;
+		case "-bugs":
+			$string = urlencode ($words);
+			header ("Location: http://www.geocrawler.com/search/?config=7109&words=$string");
+			break;
+		case "-cvs":
+			$string = urlencode ($words);
+			header ("Location: http://www.geocrawler.com/search/?config=899&words=$string");
+			break;
+		case "-devel":
+			$string = urlencode ($words);
+			header ("Location: http://www.geocrawler.com/search/?config=856&words=$string");
+			break;
+		case "-user":
+			$string = urlencode ($words);
+			header ("Location: http://www.geocrawler.com/search/?config=898&words=$string");
+			break;
+		case "site":		
+			$pageName = "Search Results";
+			$focused = "none";				// Dock icon name to get a border
+			include "parts/preamble.php";	// Load most of document
+
+			// Start actual search
+			$lib = dblist ();
+			$dbm = dbmopen ("siteindex.db","r");
+			if (dbmexists ($dbm, $string)) {
+				$parseMe = dbmfetch($dbm, $string);
+			}
+			dbmclose ($dbm);
+			if ($parseMe) {
+				echo $parseMe;
+				$filenames = preg_split("/&&/", $parseMe);
+				for ($i = 0;$i < sizeof($filenames);$i++) {
+					$temp = $filenames[$i];
+					if ($files[$temp]) {
+						$files[$temp]++;
+					} else {
+						$files[$temp] = 0;
+					}
+				}
+				while (list($key,$val) = each ($files)) {
+					echo "<P><A HREF=\"$key\">$key</A> - $val hits";
+				}		
+			} else {
+				echo "<P>Sorry, no pages found containing '$words'";
+			}
+			include "parts/postamble.php";	// Finish this sucker up
+			break;
+		default:
+			$pageName = "Search Results";
+			$focused = "none";					// Dock icon name to gets a border
+			include "parts/preamble.php";		// Load most of document
+			
+			?><P>That type of search isn't supported yet.  Please check back later.<?
+			include "parts/postamble.php"; 	// Finish this sucker up
+			break;
+	}
+?>