on feedContentText me, tWndObj 
  if (tWndObj = 0) then
    return FALSE
  end if
  tElem = tWndObj.getElement("if_text")
  if (tElem = 0) then
    return FALSE
  end if
  tText = getText("badge_desc_" & me.pData.getaProp(#value))
  tText = replaceChunks(tText, "\\r", "\r")
  tElem.setText(tText)
  return TRUE
end

on feedContentImage me, tWndObj 
  if (tWndObj = 0) then
    return FALSE
  end if
  tElem = tWndObj.getElement("if_icon")
  if (tElem = 0) then
    return FALSE
  end if
  tMemNum = getmemnum("badge" && me.pData.getaProp(#value))
  if (tMemNum = 0) then
    error(me, "Badge 'badge" && me.pData.getaProp(#value) & "' not found.", #minor)
    tMemNum = getmemnum("if.icon.temp")
    if (tMemNum = 0) then
      return FALSE
    end if
  end if
  tImage = member(tMemNum).image
  tImage = me.alignIconImage(tImage, tElem.getProperty(#width), tElem.getProperty(#height))
  tElem.feedImage(tImage)
  return TRUE
end