                     lessonsMap)]
 
         (doseq [moduleInfo newModInfoSeq]
-          (add-module-lesson-group (:moduleCode moduleInfo)
-                                   (:lessonType moduleInfo)
-                                   (:lessonGroup moduleInfo)
-                                   bgColorCssClass
-                                   true))
+          (add-module-lesson-group! (:moduleCode moduleInfo)
+                                    (:lessonType moduleInfo)
+                                    (:lessonGroup moduleInfo)
+                                    bgColorCssClass
+                                    true))
 
         ; Update URL hash with newly added module
         (update-document-location-hash-with-new-module!

    (doseq [modInfo moduleInfoFinal]
      (let [moduleCode      (:moduleCode modInfo)
            bgColorCssClass (get moduleToColorsMap moduleCode)]
        (add-module-lesson-group moduleCode
                                 (:lessonType modInfo)
                                 (:lessonGroup modInfo)
                                 bgColorCssClass
                                 true)))

    ; Update url hash
    (set-document-location-hash-based-on-modules-order!)))

                          LESSON-GROUP-CHANGE-KEY
                          (:lessonGroup augModuleSelectedLessonInfo)))))))))

(defn- add-module-lesson-group!
  "Adds a lesson group of a module to the timetable.

   The `isActuallySelected?` param is used to indicate if the current lesson
