Dyalog MiServer 3 Sample Site

Coffee

Hot black drink

Milk

Cold white drink

Latte

Warm brown drink

:class dlSimple: MiPageSample 
⍝ Control:: _html.dl _html.dt _html.dd 
⍝ Description:: Create a list of descriptions for several terms 
 
    ∇ Compose 
      :Access public 
      
      :With Add _.dl 
     ⍝ Definitions go here: 
          Add _.dt'Coffee' ⍝ Term 
          Add _.dd'Hot black drink' ⍝ Description 
          Add _.dt'Milk' 
          Add _.dd'Cold white drink' 
          Add _.dt'Latte' 
          Add _.dd'Warm brown drink' 
      :EndWith 
      
    ∇ 
:endclass