   "Returns the total number of rows in the given 0-indexed day in the Timetable,
    where 0 = Monday, 1 = Tuesday, until 4 = Friday."
   [day]
-  (count (get-timetable-day day)))
+  (count (timetable-get-day day)))
 
 (def ^{:doc     "HTML string for the <td> elements in a <tr> on the Timetable
                  Builder page"

  [affectedDaysSet]
  (doseq [day affectedDaysSet]
    (let [nrRows          (get-nr-rows-in-timetable-day day)
          ttDay           (get-timetable-day day)

          rowsPartition
          (reduce (fn [rPart [rowIdx ttRow]]

   The `moduleMapLesson` parameter should be a lesson from the `ModulesMap`
   global"
  [day startTime endTime]
  (let [ttDay (timetable-get-day day)]
    (:rowIndex
      (reduce
        (fn [result ttRow]
