<br />
<b>Warning</b>:  session_start(): open(/var/lib/php/sessions/sess_h5ehvfnku45rcumqg6b0fqd9b2, O_RDWR) failed: No space left on device (28) in <b>/var/www/tb-usercake/models/config.php</b> on line <b>51</b><br />
<br />
<b>Warning</b>:  session_start(): Failed to read session data: files (path: /var/lib/php/sessions) in <b>/var/www/tb-usercake/models/config.php</b> on line <b>51</b><br />
svoid stefansOS_addDynamicModuleDialog2(fS snippetID) {
  stefansOS_addDynamicModuleDialog2(snippetID, false);
}

svoid stefansOS_addDynamicModuleDialog2(fS snippetID, final bool reuseExisting) {
  systemQ.add(r {
    if (reuseExisting) {
      DynamicModule dm = findConcept(DynamicModule, moduleID := snippetID);
      if (dm != null) ret with showModule(dm);
    }

    temp tempBusyAnimation("Loading Module");

    final Class c = hotwireModule(snippetID);
    L<S> names = (L) callOpt(c, 'myInnerClasses);
    if (names == null)
      names = map getClassDeclarationName(innerClassesOfMain(getServerTranspiledWithoutLibs(snippetID)));
      
    // only show the usable ones
    try {
      names = shortClassNames(nonAbstractClassesInRealmImplementing(c, _getClass(c, "main$DynModule"), names));
    } catch print e {
      names = null;
    }
    
    if (empty(names))
      stefansOS_showNewDynamicModule(snippetID, null, c);
    else if (l(names) == 1)
      stefansOS_showNewDynamicModule(snippetID, "main$" + first(names), c);
    else
      selectFromList("Class to use", concatLists(ll("None"), names), voidfunc(S className) {
        stefansOS_showNewDynamicModule(snippetID, eq(className, "None") ? null : "main$" + className, c);
      });
  });
}