<commit_before>let () =
  let view_conf = Ext_container_Viewport.config
                    ~layout:"fit"
                    ~items:[|
                      Ext_panel_Panel.config
                        ~xtype:"userlist"
                        ()
                    |] () in

  let app_conf = Ext_app_Application.config
                   ~name:"AM"

                   ~appFolder:"app"

                   ~controllers: [|"Users"|]

                   ~launch: (
                     fun () ->
                       Ext.create ~name:"Ext.container.Viewport"
                         ~args:view_conf

                   ) () in

  Ext.application ~config:app_conf
<commit_msg>Refactor app.ml (account manager example)<commit_after>let () =
  let panel : Ext_panel_Panel.t Js.t =
    {| xtype = Js.string "userlist" |}
  in

  let viewport : Ext_container_Viewport.t Js.t =
    {| layout = Js.string "fit";
       items = Js.array [|Js.Unsafe.inject panel|];
     |}
  in

  let application : Ext_app_Application.t Js.t =
    {| name = Js.string "AM";

       appFolder = Js.string "app";

       controllers = Js.array [|Js.string "Users"|];

       launch = Js.wrap_callback
                  (fun () ->
                     Ext.create ~name:"Ext.container.Viewport" ~args:viewport);
     |}
  in

  Ext.application ~config:application

{'fraction_non_alphanumeric': 0.11847988077496274, 'fraction_numerical': 0.0, 'mean_word_length': 1.4285714285714286, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 5, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '3721930', 'n_tokens_mistral': 421, 'n_tokens_neox': 381, 'n_words': 72}