       )
       (element :SessionReference {}
         (element :SessionIdentity {}
-          (element :SessionName {} (format "%s-Fall-2011" schoolName))
+          (element :SessionName {} (format "%s-%s-Fall-2011" districtName schoolName))
         )
       )
       (element :CourseReference {}

(defn create-section [districtName schoolName]
  (into () [
    (element :CourseOffering {}
      (element :LocalCourseCode {} (format "%s-Math-7" schoolName))
      (element :LocalCourseTitle {} "7th Grade Math")
      (element :SchoolReference {}
        (element :EducationalOrgIdentity {}

      )
      (element :SessionReference {}
        (element :SessionIdentity {}
          (element :SessionName {} (format "%s-%s-Fall-2011" districtName schoolName))
        )
      )
    ) ]
