---

Class ::xowiki::includelet::current-irc-log

::xowiki::includelet::current-irc-log create ... \
           [ -__decoration (default "plain") ] \
           [ -parameter_declaration (default "
		{-date ""}
	    ") ]

Class Relations

• class: ::xowiki::IncludeletClass
• superclass: ::xowiki::Includelet

::xowiki::IncludeletClass create ::xowiki::includelet::current-irc-log \
     -superclass ::xowiki::Includelet

Methods (to be applied on instances)

• __decoration (setter)

• parameter_declaration (setter)

• render (scripted)

  set now [clock format [clock seconds] -format "%Y%m%d"]
  set content [[my package_id] get-html-from-log -date $now]
  if { $content eq "" } {
      return "Nothing has been logged yet for the date [clock format [clock seconds] -format %d-%b-%Y]"
  }    
  return "<p>Current conversation - [clock format [clock seconds] -format %d-%b-%Y]</p>$content"

---