--- mitgcm.org/front_content/Assemble.pl	2003/12/06 21:10:18	1.4
+++ mitgcm.org/front_content/Assemble.pl	2006/04/06 19:52:17	1.7
@@ -1,4 +1,4 @@
-#! /usr/bin/env perl
+#! /usr/bin/perl
 
 #  Ed Hill
 #  Tue Dec  2 20:17:27 EST 2003
@@ -55,6 +55,14 @@
     foreach $fm (@flist) {
 	$ind = "";
 	$name = $name0{$fm};
+
+	if ($name eq "Documentation") {
+	    $tmp = "<a href=\"http://mitgcm.org/pelican/\">"
+		. "Documentation</a><br />\n";
+	    $menu = join "", $menu, $tmp;
+	    next;
+	}
+
 	if (length($name1{$fm}) > 0) {
 	    $ind = "&nbsp;&nbsp;&nbsp;";
 	    $name = $name1{$fm};
@@ -71,8 +79,8 @@
 	}
 	$menu = join "", $menu, $tmp;
     }
-    $tmp = "<a href=\"./htdig\" />Search</a><br />\n";
-    $menu = join "", $menu, $tmp;
+    # $tmp = "<a href=\"./htdig\" />Search</a><br />\n";
+    # $menu = join "", $menu, $tmp;
 
     #  Create the output
     $_ = $template;