%angel

teacher.title = "The Gel Reference";
teacher.content = [ htmlscroll, htmlwin ];
teacher.width = 500;

%eden

fileid = fopen("../gel.txt","r");
filedata = "";
filechar = fgets(2,fileid);
while (filechar != @) {
    if (filechar == "\n")
       filedata = filedata // "<br>";
    else if (filechar == " ")
       filedata = filedata // "&nbsp;";
    else
       filedata = filedata // filechar;
    filechar = fgets(2,fileid);
}
fclose(fileid);

htmlwin_text = filedata;

butnext_mouseclick = 0;

tcl("addNotationRadioButton eden");



%angel
