         startTime  (:startTime removedAugTTLessonInfo)
         endTime    (:endTime removedAugTTLessonInfo)
         ModulesMap (aget js/window "ModulesMap")
-        dayRows    (get-in Timetable [day rowNum])
+        ttDay      (get-timetable-day day)
 
         ; This is the time range freed up by removal of the lesson
         [lowTimeIdx highTimeIdx]

        startTime  (:startTime removedAugTTLessonInfo)
        endTime    (:endTime removedAugTTLessonInfo)
        ttRow      (get-in Timetable [day row])
        minTimeIdx (time-helper/TIME-INDEX-MIN)
        maxTimeIdx (time-helper/TIME-INDEX-MAX)]

    [
      ; Find the lesson right before the removed lesson
      (let [immediateTTLessonInfoBefore


                 :occupiedVec
                 (reduce (fn [occVec [ttLessonInfo _]]
                           (.log js/console ":occupiedVec")
                           (reduce (fn [ov timeIdx] (assoc ov timeIdx true))
                                   occVec
                                   (range (:startTime ttLessonInfo)
