   []
   (set! ModulesSelectedOrder []))
 
-(defn- select2-box-update-modules
+(defn- select2-box-update-modules!
   "Update the select2 box with the currently selected modules"
   []
   ; NOTE: Internally, this does a quadratic amount of work but I do not


    ; Update Select2 box, since this is not done in `add-module-lesson-group!`.
    ; Repeated work will be done there if we did so
    (select2-box-update-modules)
    ; Update url hash
    (set-document-location-hash-based-on-modules-order!)))


                    ; Micro optimization for modules added via url hash
                    ; during initialization
                    (if (not addedViaUrlHashInit?)
                        (select2-box-update-modules!))))

              ; Only lesson types with more than 1 option of lesson group
              ; will be draggable
