   [affectedDaysSet]
   (doseq [day affectedDaysSet]
     (let [nrRows          (get-nr-rows-in-timetable-day day)
-          ttDay           (get-timetable-day day)
+          ttDay           (timetable-get-day day)
 
           rowsPartition
           (reduce (fn [rPart [rowIdx ttRow]]

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

  "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 (timetable-get-day day)))

(def ^{:doc     "HTML string for the <td> elements in a <tr> on the Timetable
                 Builder page"
