                         "helper" "clone"
                         "revert" "invalid"
                         "start"  (lesson-draggable-start-evt-handler-maker
-                                   moduleCode lessonType lessonLabel
+                                   moduleCode lessonType lessonGroup
                                    bgColorCssClass)
                         "stop"   (lesson-draggable-stop-evt-handler-maker
-                                   moduleCode lessonType lessonLabel
+                                   moduleCode lessonType lessonGroup
                                    bgColorCssClass)))))
 
 (defn- make-fake-lessons-droppable


(defn- make-added-lessons-draggable
  "Makes the <div> elements of selected lessons draggable."
  [$divElemSeq moduleCode lessonType lessonLabel bgColorCssClass]
  ; And Drag event handler
  (doseq [$divElem $divElemSeq]
    (.css $divElem "cursor" "grab")

              (if (module-lesson-type-has-multiple-choices? moduleCode
                                                            lessonType)
                  (make-added-lessons-draggable $divElemSeq moduleCode
                                                lessonType lessonGroup
                                                bgColorCssClass)))

            ; lesson was added due to draggable <div>
