+<?php
+
+/**
+ * page_header.php
+ *
+ * Copyright (c) 1999-2001 The Squirrelmail Development Team
+ * Licensed under the GNU GPL. For full terms see the file COPYING.
+ *
+ * Prints the page header (duh)
+ *
+ * $Id$
+ */
+
+/*****************************************************************/
+/*** THIS FILE NEEDS TO HAVE ITS FORMATTING FIXED!!! ***/
+/*** PLEASE DO SO AND REMOVE THIS COMMENT SECTION. ***/
+/*** + Base level indent should begin at left margin, as ***/
+/*** the first line of the function definition below. ***/
+/*** + All identation should consist of four space blocks ***/
+/*** + Tab characters are evil. ***/
+/*** + all comments should use "slash-star ... star-slash" ***/
+/*** style -- no pound characters, no slash-slash style ***/
+/*** + FLOW CONTROL STATEMENTS (if, while, etc) SHOULD ***/
+/*** ALWAYS USE { AND } CHARACTERS!!! ***/
+/*** + Please use ' instead of ", when possible. Note " ***/
+/*** should always be used in _( ) function calls. ***/
+/*** Thank you for your help making the SM code more readable. ***/
+/*****************************************************************/
+
+// Always set up the language before calling these functions
+function displayHtmlHeader
+ ($title = 'SquirrelMail', $xtra = '', $do_hook = TRUE ) {
+
+ global $theme_css;
+
+ echo '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">' .
+ "\n\n<HTML>\n<HEAD>\n";
+
+ if ($theme_css != '') {
+ echo "<LINK REL=\"stylesheet\" TYPE=\"text/css\" HREF=\"$theme_css\">\n";
+ }
+
+ if( $do_hook ) {
+ do_hook ("generic_header");
+ }
+
+ echo "<title>$title</title>$xtra</head>\n\n";
+
+ }
+
+ function displayInternalLink ($path, $text, $target='') {
+ global $base_uri;
+
+ if ($target != '')
+ $target = " target=\"$target\"";
+
+ echo '<a href="'.$base_uri.$path.'"'.$target.'>'.$text.'</a>';
+ }