         ; Perform shifting due to removal of lesson <div>s
         (shift-lessons-upwards-to-replace-empty-slots! augTTLessonInfoSeq)
         (.log js/console "Here too bro")
-        (timetable-prune-empty-rows affectedDaysSet)
+        (overall-timetable-prune-empty-rows affectedDaysSet)
         (.log js/console "Whats up")
 
         ; Update `ModulesSelected`

                             nextLessonInfoVec
                             augTTLessonInfoTo$DivElem)))))))

(defn- timetable-prune-empty-rows
  "Removes empty rows resulting from the removal of lessons on given days."
  [affectedDaysSet]
  (doseq [day affectedDaysSet]

                (timetable-remove-lesson! day rowNum ttLessonInfo)))

            (shift-lessons-upwards-to-replace-empty-slots! augTTLessonInfoSeq)
            (overall-timetable-prune-empty-rows affectedDaysSet)
            (update-ModulesSelected-for-affected-days affectedDaysSet)

            ; add the newly selected lesson group
