Entwicklermails

diff --git a/src/LTOL/2000/lists.wml b/src/LTOL/2000/lists.wml
index f2401b9..d593493 100644 (file)
--- a/src/LTOL/2000/lists.wml
+++ b/src/LTOL/2000/lists.wml
@@ -28,7 +28,22 @@
 
 <pre>
 <?
-  $query = "SELECT name,email FROM exhibitor WHERE type <> 'Sponsor' ORDER BY name";
+  $query = "SELECT name,email FROM exhibitor WHERE type <> 'Sponsor' AND type <> 'intern'  ORDER BY name";
+  $sth = pg_exec ($dbh, $query);
+
+  for ($nr=0; $nr < pg_NumRows ($sth); $nr++) {
+    $row = pg_fetch_array ($sth, $nr);
+
+    printf ("  \"%s\" &lt;%s&gt;,\n", $row['name'], $row['email']);
+  }
+?>
+</pre>
+
+<h3><font face="Helvetica,Arial">Entwickler</font></h3>
+
+<pre>
+<?
+  $query = "SELECT name,email FROM personal WHERE type = 'Devel' ORDER BY name";
   $sth = pg_exec ($dbh, $query);
 
   for ($nr=0; $nr < pg_NumRows ($sth); $nr++) {