diff --git a/iffy.coffee b/iffy.coffee
index 0c506fa..42748d8 100644
--- a/iffy.coffee
+++ b/iffy.coffee
@@ -214,7 +214,12 @@ class Gst
stId = "__gen#{@igenID++}"
@mpstId_dgOnClick.push([stId, dgOnClick])
stId
-
+
+ Link: (stText, dgOnClick, stExtra) ->
+ if not stExtra?
+ stExtra = ""
+ "#{stText}"
+
RgwstRun: () ->
wst = @rgwstInit[@rgwstInit.length - 1].WstNext(@SectionCurrent().NevByName("start"))
eniWst = Nevgen.EniWst(this, wst)
@@ -371,10 +376,7 @@ TemplateFromStNev = (st, wst) ->
word = wst.gst.SectionCurrent().WordByName(wst.gst, stWord)
if word? and (rgverb = word.Rgverb(wst)).length > 0
- dgOnClick = (ev) -> wst.gst.ShowMenu(ev, this, rgverb)
-
- stId = wst.gst.RegOnClick(dgOnClick)
- JsStringLit("#{stDisplay}")
+ JsStringLit(wst.gst.Link(stDisplay, ((ev) -> wst.gst.ShowMenu(ev, this, rgverb)), "class='iffy-word'"))
else
JsStringLit(stDisplay)
MatchInWord = MatchBracket(0, () -> PushText(true, StWord))
@@ -450,8 +452,7 @@ class ActorPlayer
StHtmlUi: (wst) ->
if (wst.nev.player_nevIDRespondedTo?)
- stId = wst.gst.RegOnClick(() => @RemoveResponse(wst.nev); wst.gst.Display())
- "Undo"
+ wst.gst.Link("Undo", (() => @RemoveResponse(wst.nev); wst.gst.Display()), "class='iffy-undo'")
class Story
constructor: (@jStory) ->