use strict;

# Frameset
sub MainFrame
{
    my $Opts = shift;

    my $Empty =  HrefEmpty( $Opts );
    my $Top =  HrefTop( $Opts );


    Head( $Opts );

    print "<frameset cols=\"160, *\" frameborder=\"1\" " .
        "framespacing=\"2\" border=\"1\">\n";
    print "  <frameset rows=\"150, *\">\n";
    print "    <frame name=\"mdstop\" src=\"$Top\" >\n";
    print "    <frame name=\"mdsdir\" ".
                     "src = \"$Empty\" >";
    print "  </frameset >\n";
    print "  <frame name=\"mdsbody\" src =\"$Empty\" >\n";
    print "  <noframes>\n";
    print "    <body>\n      <p>This page uses frames, " .
        "but your browser does not support them.</p>\n";
    print "    </body>\n  </noframes>\n</frameset>\n</html>\n";
}

1;
