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

version» Context lines:

Roxen.git/server/modules/tags/configtablist.pike:1:   /* -  * $Id: configtablist.pike,v 1.6 1997/10/15 20:19:59 grubba Exp $ +  * $Id: configtablist.pike,v 1.7 1998/03/08 13:48:51 per Exp $    *    * Makes a tab-list like the one in the config-interface.    * -  * $Author: grubba $ +  * $Author: per $    */    - constant cvs_version="$Id: configtablist.pike,v 1.6 1997/10/15 20:19:59 grubba Exp $"; + constant cvs_version="$Id: configtablist.pike,v 1.7 1998/03/08 13:48:51 per Exp $";   constant thread_safe=1;      #include <module.h>   inherit "module";   inherit "roxenlib";      /*    * Functions    */   
Roxen.git/server/modules/tags/configtablist.pike:42:   void create()   {    defvar("location", "/configtabs/", "Mountpoint", TYPE_LOCATION|VAR_MORE,    "The URL-prefix for the buttons.");   }      string tag_config_tab(string t, mapping a, string contents)   {    string dir = "u/";    mapping img_attrs = ([]); +  if(a->help) return register_module()[2];    if (a->selected) {    dir = "s/";    }    m_delete(a, "selected");       img_attrs->src = QUERY(location) + dir +    replace(http_encode_string(contents), "?", "%3f") + ".gif";    if (a->alt) {    img_attrs->alt = a->alt;    m_delete(a, "alt");