gistfile1.txt

(defn create-converters-panel
  "Creates panel containing the labels and text fields."
  []

  (let [
    create-an-inner-panel (fn [] (JPanel. (GridLayout. 0 1 5 5)))
    label-panel           (create-an-inner-panel)
    text-field-panel      (create-an-inner-panel)
    outer-panel           (JPanel. (BorderLayout.))]

    (doto label-panel
      (.add (JLabel. "Fahrenheit:  "))
      (.add (JLabel. "Celsius:     ")))

    (create-text-fields)
    (doto text-field-panel
      (.add fahr-text-field)
      (.add cels-text-field))

    (doto outer-panel
      (.add label-panel BorderLayout/WEST)
      (.add text-field-panel BorderLayout/CENTER))))