Index: openacs-4/packages/acs-api-browser/www/index.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-api-browser/www/index.adp,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/acs-api-browser/www/index.adp	12 May 2002 20:57:01 -0000	1.3
+++ openacs-4/packages/acs-api-browser/www/index.adp	19 Aug 2002 23:25:48 -0000	1.4
@@ -1,65 +1,63 @@
 <master>
 <property name=title>@title@</property>
 
-<h2>@title@</h2>
+<table align="right" border="0" cellspacing="0" cellpadding="0" bgcolor="#DDDDDD"> 
+ <tr>
+  <td>
+   <form action="proc-search" method="get">
+   <table>
+    <tr>
+     <td valign="top">
+      <h4>ACS Tcl API Search:</h4>
 
-@context_bar@
+      <input type="text" name="query_string"><br>
+      <input type="submit" value="Search" name="search_type">
+      <input type="submit" value="Feeling Lucky" name="search_type"><p>
+      <a href="proc-browse">Browse OpenACS Tcl API</a>
 
-<hr>
-<table align=right border=0 cellspacing=0 cellpadding=15 bgcolor=#DDDDDD> 
-
-<tr><td>
-<form action=proc-search method=get>
-<table><tr><td valign=top>
-   <b>ACS Tcl API Search:</b><br>
-   <input type=text name=query_string><br>
-   <input type=submit value=Search name=search_type>
-   <input type=submit value="Feeling Lucky" name=search_type><br>
-   <a href=proc-browse>Browse OpenACS Tcl API</a><br>
-
- </td>
- <td><font size=-1>
-     <table cellspacing=0 cellpadding=0>
-      <tr><td align=right>Name:</td>
-          <td><input type=checkbox name=name_weight value=5 checked> </td>
-      <tr><td align=right>Parameters:</td>
-          <td><input type=checkbox name=param_weight value=3 checked></td>
-      <tr><td align=right>Documentation:</td>
-          <td><input type=checkbox name=doc_weight value=2 checked></td>
-      <tr><td align=right>Source:</td>
-          <td><input type=checkbox name=source_weight value=1></td>
-      </tr></font>
+     </td>
+     <td>
+      <table cellspacing="0" cellpadding="0">
+        <tr><td align=right>Name:</td>
+          <td><input type="checkbox" name="name_weight" value="5" checked> </td>
+        <tr><td align=right>Parameters:</td>
+          <td><input type="checkbox" name="param_weight" value="3" checked></td>
+        <tr><td align=right>Documentation:</td>
+          <td><input type="checkbox" name="doc_weight" value="2" checked></td>
+        <tr><td align=right>Source:</td>
+          <td><input type="checkbox" name="source_weight" value="1"></td>
+        </tr>
       </table>
- </td>
-</form></table>
+     </td>
+    </tr>
+   </table>
+   </form>
 
-  <h4>ACS PL/SQL API Search:</h4>
-  <a href="plsql-subprograms-all">Browse OpenACS PL/SQL API</a>
+   <hr>
+    <h4>ACS PL/SQL API Search:</h4>
+    <a href="plsql-subprograms-all">Browse OpenACS PL/SQL API</a>
+    <p>
 
-  <p>
+    <form action="tcl-proc-view" method="get">
+     <h4>AOLserver API Search:</h4><br>
+     <input type="text" name="tcl_proc">
+     <input type="submit" value="Go"><br>
+     (enter <em>exact</em> procedure name)<br>
+     <a href="@aolserver_tcl_api_root@">Browse AOLserver Tcl API</a>
+    </form>
 
-  <form action=tcl-proc-view method=get>
-  <b>AOLserver API Search:</b><br>
-  <input type=text name=tcl_proc>
-  <input type=submit value=Go><br>
-  (enter <em>exact</em> procedure name)<br>
-  <a href="@aolserver_tcl_api_root@">Browse AOLserver Tcl API</a>
-  </form>
+    <p>
 
-  <p>
+    <h4>Tcl Documentation Search:</h4>
+    <form action="tcl-doc-search" method="get">
+     <input type="text" name="tcl_proc">
+     <input type="submit" value="Go"><br>
+     (enter <em>exact</em> procedure name)<br>
+     <a href="@tcl_docs_root@">Browse the Tcl documentation</a>
+    </form>
 
-  <form action=tcl-doc-search method=get>
-  <b>Tcl Documentation Search:</b><br>
-  <input type=text name=tcl_proc>
-  <input type=submit value=Go><br>
-  (enter <em>exact</em> procedure name)<br>
-  <a href="@tcl_docs_root@">Browse the Tcl documentation</a>
-  </form>
-
-</td>
-</tr>
-</form>
-</td>
+   </td>
+  </tr>
 </table>
 
 
@@ -76,20 +74,29 @@
 
 <h3>Disabled Packages</h3>
 
-<ul>
 
-<multiple name="disabled_packages">
-  <li>@disabled_packages.pretty_name@ @disabled_packages.version_name@</a>
-</multiple>
+<if @disabled_packages:rowcount@ eq 0>
+ <b>NONE</b>  
+</if>
+<else>
+ <multiple name="disabled_packages">
+  <ul>
+   <li>@disabled_packages.pretty_name@ @disabled_packages.version_name@</a>
+  </ul>
+ </multiple>
+</else>
 
-</ul>
 
 <h3>Uninstalled Packages</h3>
 
-<ul>
+<if @uninstalled_packages:rowcount@ eq 0>
+<b>NONE</b>
+</if>
+<else>
+ <multiple name="uninstalled_packages">
+  <ul>
+   <li>@uninstalled_packages.pretty_name@ @uninstalled_packages.version_name@</a>
+  </ul>
+ </multiple>
+</else>
 
-<multiple name="uninstalled_packages">
-  <li>@uninstalled_packages.pretty_name@ @uninstalled_packages.version_name@</a>
-</multiple>
-
-</ul>