open(TL,"$path_to_lang/$thislang/openpage.txt"); while(){push(@LaNg,$_)} &exec_lang; if($demo_mode){ #$open1=qq~alert("DISABLED FOR DEMO")~; $open2=qq~alert("DISABLED FOR DEMO")~; $open3=qq~alert("DISABLED FOR DEMO")~; }else{ $open1=qq~url=document.getElementById("open_url").value dialogArguments.open_it(url) ~; $open2=qq~hole.location="$url_to_editor?delete_file="+document.getElementById("open_url").value~; $open3=qq~hole.location="$url_to_editor?delete_folder="+pad.urldir document.getElementById("del_folder").value="DELETING" document.getElementById("del_folder").disabled=true~; } &check_cookie; &check_login; if($buttons =~ /folder_delete/){$DF="hidden"}else{$DF="visible"} print "Content-type: text/html\n\n"; open(OH,"$htm/openpage.txt"); while(){ s/\$(\w+)/${$1}/eg; print } 1;