    augmented with the `:day` and `:rowNum` keys."
   [removedAugTTLessonInfo]
   (let [day        (:day removedAugTTLessonInfo)
-        row        (:rowNum removedAugTTLessonInfo)
+        rowNum     (:rowNum removedAugTTLessonInfo)
         startTime  (:startTime removedAugTTLessonInfo)
         endTime    (:endTime removedAugTTLessonInfo)
-        ttRow      (get-in Timetable [day row])
         minTimeIdx time-helper/TIME-INDEX-MIN
         maxTimeIdx time-helper/TIME-INDEX-MAX]
 

  [day rowNum ttLessonInfo]
  (get-in Timetable [day rowNum ttLessonInfo]))

(defn- create-lesson-div
  "Creates a <div> element for a new lesson using jQuery"
  [& {:keys [moduleCode moduleName lessonType lessonGroup venue slotsOcc

    [
      ; Find the lesson right before the removed lesson
      (let [immediateTTLessonInfoBefore
            (timetable-get-closest-TimetableLessonInfo-before-time
              day rowNum startTime)]
        (if (nil? immediateTTLessonInfoBefore)
            minTimeIdx
            (:endTime immediateTTLessonInfoBefore)))

      ; Find the lesson right after the removed lesson
      (let [immediateTTLessonInfoAfter
            (timetable-get-closest-TimetableLessonInfo-on-or-after-time
              day rowNum endTime)]
        (if (nil? immediateTTLessonInfoAfter)
            maxTimeIdx
            (dec (:startTime immediateTTLessonInfoAfter))))
