Roxen.git / server / modules / tags / killframe.pike

version» Context lines:

Roxen.git/server/modules/tags/killframe.pike:1:   /* This is a roxen module. (c) Informationsv√§varna AB 1997. -  * $Id: killframe.pike,v 1.4 1997/06/09 18:28:28 peter Exp $ +  * $Id: killframe.pike,v 1.5 1997/08/10 00:29:09 grubba Exp $    *    * Adds some java script that will prevent others from putting    * your page in a frame.    *    * Will also remove occuranses of "index.html" at the end of the URL.    *    * made by Peter Bortas <peter@infovav.se> Januari -97    */      #include <module.h>
Roxen.git/server/modules/tags/killframe.pike:27:    " Will also strip any occurences of the string\n"    " 'index.html' from the end of the URL."    "</pre>"    ), ({}), 1,    });   }      string tag_killframe( string tag, mapping m, object id )   {    // Links to index.html are ugly. -  string my_url = roxen->query("MyWorldLocation") + id->raw_url[1..]; +  string my_url = id->conf->query("MyWorldLocation") + id->raw_url[1..];       string flip = reverse(my_url);       if( flip[0..9] == reverse("index.html") )    my_url = reverse(flip[10..]);       if (id->supports->javascript)    string head = "<script language=javascript>\n"    "<!--\n"    " if(top.location.href != \""+ my_url +"\")\n"