Roxen.git/ server/ modules/ graphics/ gbutton.pike

2000-03-24

2000-03-24 14:21:28 by Johan Sundström <oyasumi@gmail.com>

• dbc272bb9c4b5f52226810b7f50ee96598d86b70 (28 lines) (+14/-14) ^{[ Show | Annotate ]}
  Branch: 5.2

Now forwards target, onmousedown, onmouseup, onclick, ondblclick,
onmouseout, onmouseover, onkeypress, onkeyup and onkeydown arguments
to the generated a tag.

Rev: server/modules/graphics/gbutton.pike:1.41

25:   // must also be aligned left or right.       - constant cvs_version = "$Id: gbutton.pike,v 1.40 2000/03/24 09:00:37 wellhard Exp $"; + constant cvs_version = "$Id: gbutton.pike,v 1.41 2000/03/24 14:21:28 jhs Exp $";   constant thread_safe = 1;      #include <module.h>
560:    img_attrs->height = size->ysize;    }    +  result = make_tag("img", img_attrs); +     // Make button clickable if not dimmed -  if (args->href && !new_args->dim) { +  if(args->href && !new_args->dim) +  {    mapping a_attrs = ([ "href" : args->href ]); -  if (args->target) -  a_attrs->target = args->target; +     -  if (args->onClick) -  a_attrs->onClick = args->onClick; +  foreach(indices(args), string arg) +  if(has_value("target/onmousedown/onmouseup/onclick/ondblclick/onmouseout/" +  "onmouseover/onkeypress/onkeyup/onkeydown"/"/", lower_case(arg))) +  a_attrs[arg] = args[arg];    -  if (args->onclick) -  a_attrs->onclick = args->onclick; +  result = make_container("a", a_attrs, result); +  }    -  result=make_container("a", a_attrs, make_tag("img", img_attrs)); -  } else -  result=make_tag("img", img_attrs); -  +     return 0;    }    }   }