Roxen.git
/
server
/
modules
/
tags
/
killframe.pike
version
»
Context lines:
10
20
40
80
file
none
3
Roxen.git/server/modules/tags/killframe.pike:3:
* 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 * * Thanks to */
-
constant cvs_version = "$Id: killframe.pike,v 1.
12
1998/
01
/
15
10
:
40
:
18
peter
Exp $";
+
constant cvs_version = "$Id: killframe.pike,v 1.
13
1998/
03
/
08
13
:
48
:
54
per
Exp $";
constant thread_safe=1; #include <module.h> inherit "module"; void create() { } mixed *register_module() { return ({
Roxen.git/server/modules/tags/killframe.pike:31:
/* " 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. */
+
if(m->help) return register_module()[2];
+
string my_url = id->conf->query("MyWorldLocation") + id->raw_url[1..]; int l=strlen(my_url); if( my_url[l-11..] == "/index.html" ) my_url = my_url[..l-11]; if (id->supports->javascript) return("<script language=javascript>\n" "<!--\n" " if(top.location != \""+ my_url +"\")\n" " top.location = \""+ my_url +"\";\n" "//-->" "</script>\n"); return ""; } mapping query_tag_callers() { return ([ "killframe" : tag_killframe ]); }